End Try
Console.WriteLine("The measured power was " & MeasuredPower.ToString())
' Now that we're done, close the V3500A, making available for other users
myPM.Close()
End Sub
Private Sub CheckForOK(ByVal
If
(Message.Equals("OK"))
Exit Sub
End If
Console.WriteLine("Expected an 'OK' from the V3500A, received: " & Message)
End Sub
End Module
V3500A User's Guide
Message
As
String)
Then
Driver Installation and Commands
3
67