target  : (4,0xB1) VarIndexStAd
status  : emitted
from    : discovery snippet 'st_arrvar_Obj' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim v As Variant, b As Object
  ReDim a(5) As Object
  Set v(1) = New Collection
End Sub

target disasm lines:
  modProbe.Sub Main | 4014BD    FEB1 0100             VarIndexStAd dim:0x1
