Data Type VB.Net Tutorial

Public Class Tester
    Public Shared Sub Main
        Dim theData As String = Nothing
        Dim result As New System.Text.StringBuilder
        ' ----- Format nothing.
        result.AppendLine(String.Format( _
           "IsNumeric({0}) ... {1}", theData, IsNumeric(theData)))
        result.AppendLine(String.Format( _
           "IsDate({0}) ... {1}", theData, IsDate(theData)))
        result.AppendLine(String.Format( _
           "IsNothing({0}) ... {1}", theData, IsNothing(theData)))
        result.AppendLine()
        ' ----- Format a number in a string.
        theData = "-12.345"
        result.AppendLine(String.Format( _
           "IsNumeric({0}) ... {1}", theData, IsNumeric(theData)))
        result.AppendLine(String.Format( _
           "IsDate({0}) ... {1}", theData, IsDate(theData)))
        result.AppendLine(String.Format( _
           "IsNothing({0}) ... {1}", theData, IsNothing(theData)))
        result.AppendLine()
        ' ----- Format a date in a string.
        theData = "July 17, 2007"
        result.AppendLine(String.Format( _
           "IsNumeric({0}) ... {1}", theData, IsNumeric(theData)))
        result.AppendLine(String.Format( _
           "IsDate({0}) ... {1}", theData, IsDate(theData)))
        result.Append(String.Format( _
           "IsNothing({0}) ... {1}", theData, IsNothing(theData)))
        Console.WriteLine(result.ToString())
    End Sub
End Class
IsNumeric() ... False
IsDate() ... False
IsNothing() ... True
IsNumeric(-12.345) ... True
IsDate(-12.345) ... False
IsNothing(-12.345) ... False
IsNumeric(July 17, 2007) ... False
IsDate(July 17, 2007) ... True
IsNothing(July 17, 2007) ... False