target  : (2,0x6F) CheckTypeVar
status  : emitted
from    : discovery snippet 'obj_typeof_var' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As Variant, n As Long
  If TypeOf a Is Collection Then n = 1
End Sub

target disasm lines:
  modProbe.Sub Main | 401463    FC6F 0000             CheckTypeVar
