VB.Net/Development/Is Value Type

Is it a Value Type

<source lang="vbnet"> Imports System Imports System.Collections

Public Class MainClass

 Shared Sub Main()
       Dim a As Integer = 3
       Console.WriteLine("a is a value type is " & IsValueType(a))
 End Sub
 
 Shared Function IsValueType(ByVal thing As Object) As Boolean
     Return (TypeOf (thing) Is System.ValueType)
 End Function

End Class

      </source>