9Programming Examples
FormatNumber(dblQueryResult / 1000, 4) + " kHz"
' Query for duty cycle.
err = viVPrintf(vi, ":MEASURE:DUTYCYCLE?" + vbLf, 0) ' Read duty cycle.
err = viVScanf(vi, "%lf" + vbLf, VarPtr(dblQueryResult))
MsgBox "Duty cycle:" + vbCrLf + FormatNumber(dblQueryResult, 3) + "%"
' Query for risetime.
err = viVPrintf(vi, ":MEASURE:RISETIME?" + vbLf, 0) ' Read risetime.
err = viVScanf(vi, "%lf" + vbLf, VarPtr(dblQueryResult)) MsgBox "Risetime:" + vbCrLf + _
FormatNumber(dblQueryResult * 1000000, 4) + " us"
' Query for Peak to Peak voltage.
err = viVPrintf(vi, ":MEASURE:VPP?" + vbLf, 0) ' Read VPP.
err = viVScanf(vi, "%lf" + vbLf, VarPtr(dblQueryResult)) MsgBox "Peak to peak voltage:" + vbCrLf + _
FormatNumber(dblQueryResult, 4) + " V"
' Query for Vmax.
err = viVPrintf(vi, ":MEASURE:VMAX?" + vbLf, 0) ' Read Vmax.
err = viVScanf(vi, "%lf" + vbLf, VarPtr(dblQueryResult)) MsgBox "Maximum voltage:" + vbCrLf + _
FormatNumber(dblQueryResult, 4) + " V"
'WAVEFORM_DATA - To obtain waveform data, you must specify the
'WAVEFORM parameters for the waveform data prior to sending the
'":WAVEFORM:DATA?" query. Once these parameters have been sent,
'the waveform data and the preamble can be read.
'
'WAVE_SOURCE - Selects the channel to be used as the source for
'the waveform commands.
err = viVPrintf(vi, ":WAVEFORM:SOURCE CHAN1" + vbLf, 0)
'WAVE_POINTS - Specifies the number of points to be transferred
'using the ":WAVEFORM:DATA?" query.
err = viVPrintf(vi, ":WAVEFORM:POINTS 1000" + vbLf, 0)
'WAVE_FORMAT - Sets the data transmission mode for the waveform
'data output. This command controls whether data is formatted in
'a word or byte format when sent from the oscilloscope.
Dim lngVSteps As Long
Dim intBytesPerData As Integer
' Data in range 0 to 65535.
err = viVPrintf(vi, ":WAVEFORM:FORMAT WORD" + vbLf, 0) lngVSteps = 65536
intBytesPerData = 2
' Data in range 0 to 255.
'err = viVPrintf(vi, ":WAVEFORM:FORMAT BYTE" + vbLf, 0) 'lngVSteps = 256
'intBytesPerData = 1
574 | Agilent InfiniiVision 5000 Series Oscilloscopes Programmer's Reference |