Keysight V3500A User Manual page 86

3 Driver Installation and Commands
' Initialize the PowerMeter
Try
myPM.Initialize()
' If initialization fails:
Catch e As Exception
Console.WriteLine("Error opening V3500A: " & e.Message)
Exit Sub
End Try
Console.WriteLine("V3500A initialized")
' Now we can communicate with the PowerMeter.
' Configure the PowerMeter for a measurement:
Try
Reply = myPM.SendString("*RST" & vbLf) 'Reset the PowerMeter
CheckForOK(Reply)
Reply = myPM.SendString("FREQ1000" & vbLf) 'Set the frequency to 1000 MHz
CheckForOK(Reply)
' If an error occurred:
Catch e2 As
Console.WriteLine("Error sending to V3500A: " & e2.Message)
Exit Sub
End Try
Console.WriteLine("V3500A configured")
' Take a reading:
Try
Reply = myPM.SendString("*TRG" & vbLf) ' Trigger a power measurement
MeasuredPower = Convert.ToDouble(Reply)
Catch e3 As
Console.WriteLine("Error reading power from V3500A: " & e3.Message)
Exit Sub
66
Exception
Exception
V3500A User's Guide