public class Test public Shared Sub Main Dim lNum As Long Console.WriteLine("Long: " & lNum.MinValue & " to " & lNum.MaxValue) End SubEnd class Long: -9223372036854775808 to 9223372036854775807