AnnGetScalarX example for Visual Basic
MsgBox "ScalarX: " & LEAD1.AnnGetScalarX (hCont) & ", ScalarY: " & LEAD1.AnnGetScalarY (hCont) & ", OffsetX: " & LEAD1.AnnGetOffsetX (hCont) & ", OffsetY: " & LEAD1.AnnGetOffsetY (hCont)
LEAD1.AnnSetScalarX hCont, 1.5, False
LEAD1.AnnSetScalarY hCont, 1.5, False
LEAD1.AnnSetOffsetX hCont, 10, False
LEAD1.AnnSetOffsetY hCont, 20, False
MsgBox "ScalarX: " & LEAD1.AnnGetScalarX(hCont) & ", ScalarY: " & LEAD1.AnnGetScalarY(hCont) & ", OffsetX: " & LEAD1.AnnGetOffsetX(hCont) & ", OffsetY: " & LEAD1.AnnGetOffsetY(hCont)