Agilent Technologies MSO6102A Programmer's Reference Manual page 271

Example program from the start:
page 614
Agilent 6000 Series Oscilloscopes Programmer's Reference
+ FormatNumber(varQueryResult / 1000, 4) + " kHz"
myScope.WriteString ":MEASURE:DUTYCYCLE?"
varQueryResult = myScope.ReadNumber
MsgBox "Duty cycle:" + vbCrLf _
+ FormatNumber(varQueryResult, 3) + "%"
myScope.WriteString ":MEASURE:RISETIME?"
varQueryResult = myScope.ReadNumber
MsgBox "Risetime:" + vbCrLf _
+ FormatNumber(varQueryResult * 1000000, 4) + " us"
myScope.WriteString ":MEASURE:VPP?"
varQueryResult = myScope.ReadNumber
MsgBox "Peak to peak voltage:" + vbCrLf _
+ FormatNumber(varQueryResult, 4) + " V"
myScope.WriteString ":MEASURE:VMAX?"
varQueryResult = myScope.ReadNumber
MsgBox "Maximum voltage:" + vbCrLf _
+ FormatNumber(varQueryResult, 4) + " V"
Commands by Subsystem
' Query for duty cycle.
' Read duty cycle.
' Query for risetime.
' Read risetime.
' Query for Pk to Pk voltage.
' Read VPP.
' Query for Vmax.
' Read Vmax.
"VISA COM Example in Visual Basic"
3
on
271