Keysight V3500A User Manual page 91

Example code using Microsoft Visual Basic 6.0
This sample program shows how to program the V3500A using Microsoft Visual Basic 6.0.
Dim myPM As New KeysightV3500A.KeysightV3500A
Dim Message As String
Private Sub btnExit_Click()
myPM.Close
End
End Sub
Private Sub btnReadPower_Click()
Dim MeasuredPower
Dim Reply As String
' Now we can communicate with the V3500A.
' Configure the V3500A for a measurement:
On Error GoTo
Reply = myPM.SendString("*RST" & vbCrLf) ' Reset the V3500A
CheckForOK(Reply)
V3500A User's Guide
Microsoft Visual Basic 6.0
This example section contains a Windows Forms application.
Follow the steps below to run in Microsoft Visual Basic 6.0:
1 Create a new Windows Forms project.
2 Delete the source code of the newly created Windows
Forms project.
3 Copy the following code into the source code file.
4 Create three controls on the form:
• A button named btnReadPower
• A button named btnExit
• A text box named txtMessages
5 Add a reference to the DLL — refer to
(Visual Basic 6.0)" on page
As Double
Err_Failed_Setup
Driver Installation and Commands
"Adding a reference
44.
3
71