302 Keysight E4980A/AL Precision LCR Meter
Sample Program
Read Measurement Results
9-
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 Example 9-8 is described below.
Configuration Assigns variables and enables error handling by the
subroutine named ErrorHandler.
Open Instrument Assigns a USB address or GPIB address to the I/O bus. Also
sets the time for timeout.
Setup Start Sets the trigger, list sweep, and data format.
List Read Reads the measurement data and displays the returned
BINARY format array data individually.
Setup End Closes the I/O bus.
ErrorProc Displays an error number when an error occurs.
Example 9-8 Read measurement results (BINARY format, list sweep)
Sub Example_3_6()
'===================================
' Configuration
'===================================
Dim defrm As Long 'Session to Default Resource
Manager
Dim AgtE4980A/AL As Long 'Session to instrument
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)