The following example opens the Tag Status Picture for the first found
tag for the object Object1 when
a button is pressed. The tags that are displayed are retrieved
from the currently selected objects.
Private Sub Button_OpenTSPic_Click()
Object1.Open_TS_Pic
End Sub