Option Explicit Off
Option Strict On
Option Infer On

Imports System

Module Test
Sub Main()
     obj = "42"
     Dim int = 42
     Dim dbl = 4.2
     'Dim tst ' error BC30209: Option Strict On requires all variable declarations to have an 'As' clause.
     Console.WriteLine("obj:" & GetTypeOf(obj))
     Console.WriteLine("int:" & GetTypeOf(int))
     Console.WriteLine("dbl:" & GetTypeOf(dbl))

     Console.ReadLine()
End Sub

Function GetTypeOf(Of T)(v As T) As String
  Return GetType(T).FullName
End Function

End Module