target  : (1,0x8C) BetweenTextVar
status  : emitted
from    : discovery snippet 'selbetweenT_Var' (minimised)

' ---- modProbe.bas
Option Compare Text
Option Explicit

Public Sub Main()
  Dim a As Variant, n As Long
  Select Case a
    Case "a" To "f": n = 1
  End Select
End Sub

target disasm lines:
  modProbe.Sub Main | 40147A    FB8C                  BetweenTextVar
