Public Function GetNonNullable(ByVal tcValue As String) As String Dim lcValue As String= "" ' If we have a value If Not string.IsNullOrEmpty(tcValue) Then lcValue = tcValue End If Return lcValue End Function~~Bonnie
> ' Avoid to receive a null > ' expC1 Value > Public Function GetNonNullable(ByVal tcValue As String) As String > Dim lcValue As Integer = "" > > ' If we have a value > If Not tcValue Is DBNull.Value Then > lcValue = tcValue > End If > > Return lcValue > End Function >