Sample Program
Read Measurement Results
Read measurement data in BINARY format (List sweep)
This application program performs a list sweep and reads the measured value
and limit judgment at each measurement point in BINARY format.
The program of
Configuration
Open Instrument Assigns a USB address or GPIB address to the I/O bus. Also
Setup Start
List Read
Setup End
ErrorProc
Example 9-8
Read measurement results (BINARY format, list sweep)
Sub Example_3_6()
Manager
302
Example 9-8
Assigns variables and enables error handling by the
subroutine named ErrorHandler.
sets the time for timeout.
Sets the trigger, list sweep, and data format.
Reads the measurement data and displays the returned
BINARY format array data individually.
Closes the I/O bus.
Displays an error number when an error occurs.
'===================================
' Configuration
'===================================
Dim defrm As Long
Dim AgtE4980A/AL As Long
Dim Res() As Double
Dim Nop As Long, i As Integer, j As Integer, k As Integer
Dim outEventType As Long, outEventContext As Long
Const TimeOutTime = 30000
On Error GoTo ErrorHandler
'===================================
' Open Instrument
'===================================
ErrorCheck viOpenDefaultRM(defrm)
is described below.
'Session to Default Resource
'Session to instrument
Keysight E4980A/AL Precision LCR Meter