1076
Agilent Infiniium 90000 Series Oscilloscopes Programmer's Reference
38
Sample Programs
' Get unsigned integer bytes.
err = viVScanf(vi, "%#b" + vbLf, paramsArray(0))
If (err <> VI_SUCCESS) Then HandleVISAError vi
err = viFlush(vi, VI_READ_BUF)
If (err <> VI_SUCCESS) Then HandleVISAError vi
err = viFlush(vi, VI_WRITE_BUF)
If (err <> VI_SUCCESS) Then HandleVISAError vi
' retCount is now actual number of bytes returned by query.
DoQueryIEEEBlock_Bytes = retCount
CheckInstrumentErrors
End Function
Private Function DoQueryIEEEBlock_Words(query As String) As Long
' Send query.
err = viVPrintf(vi, query + vbLf, 0)
If (err <> VI_SUCCESS) Then HandleVISAError vi
' Set up paramsArray for multiple parameter query returning array.
paramsArray(0) = VarPtr(retCount)
paramsArray(1) = VarPtr(wordArray(0))
' Set retCount to max number of elements array can hold.
retCount = WordArraySize
' Get signed integer words.
err = viVScanf(vi, "%#hb" + vbLf, paramsArray(0))
If (err <> VI_SUCCESS) Then HandleVISAError vi
err = viFlush(vi, VI_READ_BUF)
If (err <> VI_SUCCESS) Then HandleVISAError vi
err = viFlush(vi, VI_WRITE_BUF)
If (err <> VI_SUCCESS) Then HandleVISAError vi
' retCount is now actual number of bytes returned by query.
DoQueryIEEEBlock_Words = retCount
CheckInstrumentErrors
End Function
Private Sub CheckInstrumentErrors()
On Error GoTo ErrorHandler
Dim strErrVal As String * 200
Dim strOut As String
err = viVPrintf(vi, ":SYSTem:ERRor? STRing" + vbLf, 0) ' Query any err
ors.
Содержание Infiniium 90000 Q-Series
Страница 1: ...s1 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference...
Страница 50: ...50 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 2 Setting Up...
Страница 86: ...86 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 3 Introduction to Programming...
Страница 146: ...146 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 8 Programming Conventions...
Страница 190: ...190 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 11 Calibration Commands...
Страница 274: ...274 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 14 Digital Commands...
Страница 292: ...292 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 15 Disk Commands...
Страница 318: ...318 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 16 Display Commands...
Страница 364: ...364 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 17 Function Commands...
Страница 382: ...382 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 19 Histogram Commands...
Страница 404: ...404 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 20 InfiniiScan ISCan Commands...
Страница 412: ...412 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 21 Limit Test Commands...
Страница 416: ...416 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 22 Lister Commands...
Страница 696: ...696 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 25 Measure Commands...
Страница 702: ...702 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 26 Pod Commands...
Страница 760: ...760 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 29 Self Test Commands...
Страница 804: ...804 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 30 Serial Data Equalization Commands...
Страница 818: ...818 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 31 System Commands...
Страница 830: ...830 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 32 Time Base Commands...
Страница 930: ...930 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 33 Trigger Commands...
Страница 1000: ...1000 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 35 Waveform Memory Commands...
Страница 1018: ...1018 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 37 Error Messages...
Страница 1109: ...Sample Programs 38 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 1109 print End of program...
Страница 1150: ...1150 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference 38 Sample Programs...
Страница 1186: ...1186 Agilent Infiniium 90000 Series Oscilloscopes Programmer s Reference Index...