Imports System
Public Class VarType
Public Shared Sub Main(ByVal args As String())
Dim a As Integer = 242
Console.WriteLine(a.GetType())
Dim obj As Object = "C#"
Dim objType As Type = obj.GetType()
Console.WriteLine(objType)
Dim b As Double = 383.023
Console.WriteLine(b.GetType())
Dim c As String = "abc"
Console.WriteLine(c.GetType())
Dim d As Boolean = False
Console.WriteLine(d.GetType())
Dim e As Char = "a"c
Console.WriteLine(e.GetType())
Dim f As UInteger = 8293481
Console.WriteLine(f.GetType())
End Sub
End Class
' run:
'
' System.Int32
' System.String
' System.Double
' System.String
' System.Boolean
' System.Char
' System.UInt32
'
