Agilent Technologies 33500 Series - Page 224

223
Chapter 4 Application Programs
Program Listings
4
4
'Enable AM Modulation
.WriteString "SOURCE1:AM:STATE ON"
'Enable output
.WriteString "OUTPUT1 ON"
Sleep 1000
End With
Text2.Text = "Amplitude modulation output enabled"
Exit Sub
MyError:
Text2 = Err.Description
Resume Next
End Sub
Private Sub Form_Load()
Text2.Text = ""
End Sub