Aan collection toevoegen als het er nog niet inzit

  • Onderwerp starter Onderwerp starter FTMC
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

FTMC

Gebruiker
Lid geworden
14 jan 2006
Berichten
115
Hey

Ik heb en probleem met mij collections.. ik wil uit mijn database records gaan halen en retourneren als collection, maar hij mag ze enkel toevoegen als het record er nog niet inzit... ik had een functie in collection die retourneert of ze erin zit of niet maar ze werkt niet hoe het zou moeten... Kan er iemand mij helpen?

Dank bij voorbaat

Code:
Public Function inCollection(ByVal ntak As bsTak, ByVal col As Collection) As Boolean
    For Each tak As bsTak In col
      If tak.Tak_ID = ntak.Tak_ID Then
        Return True
      Else
        Return False
      End If
    Next
  End Function
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan