[Visual Basic] Public Function Check_Zahlungsdaten( _
ByVal Key As Integer _
) As Boolean
[Visual Basic] Public Function Check_Zahlungsdaten(ByVal Key As Integer) As Boolean
For Each dr As DataRow In Me.Ereignistypen.Rows
If dr.Item("Ereignistypnr") = Key And dr.Item("Zahlung") = True Then
Return True
End If
Next
Return False
End Function
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition