VB.Net/Development/Is Value Type

Is it a Value Type

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