DefaultTag example for Visual Basic

'Restore default Tag values
Screen.MousePointer = vbHourglass
LEADDICOM1.DefaultTag
Screen.MousePointer = vbDefault