Agilent B1500 VXIplug&play Driver User’s Guide, Edition 3 3-11
Programming Examples for Visual Basic Users
Multi Channel Spot Measurement
Sub mspot_meas(vi As Long, ret As Long, pins() As Long) ’1
Dim vc As Double ’3
Dim vb As Double
Dim ve As Double
Dim iccomp As Double
Dim ibcomp As Double
Dim iecomp As Double
ve = 0
iecomp = 0.2
vb = 0.7
ibcomp = 0.01
vc = 3
iccomp = 0.1 ’15
Dim mch(3) As Long ’17
mch(0) = pins(2) ’collector
mch(1) = pins(1) ’base
mch(2) = 0
Dim mode(2) As Long
mode(0) = 1 ’current measurement
mode(1) = 1 ’current measurement
Dim range(2) As Double
range(0) = 0 ’auto range
range(1) = 0 ’auto range
Dim md(2) As Double
Dim st(2) As Long
Dim tm(2) As Double ’32
Line Description
1 Beginning of the mspot_meas subprogram.
3 to 15 Declares variables used to set the source channels, and defines
the value.
17 to 28 Declares variables used to set the measurement channels, and
defines the value.
30 to 32 Declares variables used to keep the measurement data, status
data, and time stamp data.