Public Module modMain Public Sub Main() Dim title As String = "Mr." Dim name As Object = DBNull.Value Dim addressLine1 As String = title & " " & name If IsDBNull(addressLine1) Then
Console.WriteLine("Null value")
Else
Console.WriteLine(addressLine1) End If End Sub End Module