3-44 Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4
Programming Examples for Visual Basic Users
Staircase Sweep with Pulsed Bias Measurements
Sub sweep_meas(vi As Long, ret As Long, m() As Long) ’1
Dim vd1 As Double ’3
Dim vd2 As Double
Dim idcomp As Double
Dim vg1 As Double
Dim vg2 As Double
Dim igcomp As Double
Dim hold As Double
Dim delay As Double
Dim s_delay As Double
Dim p_comp As Double
vd1 = 0
vd2 = 3
idcomp = 0.05
vg1 = 1
vg2 = 3
igcomp = 0.01
hold = 0
delay = 0
s_delay = 0
p_comp = 0
Dim nop1 As Long
Dim nop2 As Long
nop1 = 11
nop2 = 3 ’27
Dim i As Integer
Dim j As Integer
Dim n As Long
n = nop1 * nop2
Dim msg As String
Dim rep As Long ’35
Dim sc() As Double ’primary sweep output data
Dim md() As Double ’sweep measurement data
Dim st() As Long ’status data at each step
Dim dvg() As Double ’secondary sweep output data
ReDim Preserve sc(n) As Double
ReDim Preserve md(n) As Double
ReDim Preserve st(n) As Long
ReDim Preserve dvg(nop2) As Double ’43
ret = hp4156b_setFilter(vi, m(1), hp4156b_FLAG_OFF) ’45
ret = hp4156b_force(vi, m(3), hp4156b_VF_MODE, 0, 0, 0.05, 0)
ret = hp4156b_force(vi, m(2), hp4156b_VF_MODE, 0, 0, 0.05, 0)
Line Description
1 Beginning of the sweep_meas subprogram.
3 to 32 Declares variables for source channels, and defines the value.
35 to 43 Declares variables used to keep source data, measurement data
and status data. Also defines array size.
45 to 47 Sets the SMU filter off for the pulsed bias channel, and applies
voltage to device.
To Next Page
Loading...
Need help?
General
