>        ' Avoid to receive a null
>        ' expC1 Value
>        Public Function GetNonNullable(ByVal tcValue As String) As String
>            Dim lcValue As String = ""
>
>            ' If we have a value
>            If Not IsDBNull(tcValue) Then
>                lcValue = tcValue
>            End If
>
>            Return lcValue
>        End Function
>