[Visual Basic] Private Function update_details( _
ByRef s As String, _
ByVal c1element As String _
) As Object
[Visual Basic] Private Function update_details(ByRef s As String, ByVal c1element As String)
Try
If Not Me.C1Vertragselemente.Columns(c1element).Value Is System.DBNull.Value Then
s = Me.C1Vertragselemente.Columns(c1element).Value
Else
s = ""
End If
Catch ex As Exception
s = ""
End Try
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