Agilent Technologies 33500 Series - Page 242

241
Chapter 4 Application Programs
Program Listings
4
4
Exit Sub
MyError:
Text2 = Err.Description
Resume Next
End Sub
Private Sub Form_Load()
Text2.Text = ""
End Sub