target  : (4,0xC9) CDateStr
status  : emitted
from    : discovery snippet 'cast_Str_CDate' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As String, c As Date
  c = CDate(a)
End Sub

target disasm lines:
  modProbe.Sub Main | 40144F    FEC9                  CDateStr
