Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4 4-27
Programming Examples for Visual Basic .NET Users
Multi-Channel Pulsed Sweep Measurements
Measurement
Result Example
Ic (mA), Status_c, Ib (mA), Status_b, Ve (V)
-1.21572E-09,0,-3.3938E-10,0,0
7.9188E-10,0,4.3032E-10,0,-0.08
2.9592E-09,0,1.19947E-09,0,-0.16
1.23562E-07,0,9.6629E-09,0,-0.24
1.74463E-06,0,2.70753E-08,0,-0.32
3.76546E-05,0,3.66487E-07,0,-0.4
0.000832422,0,5.73051E-06,0,-0.48
0.0183221,0,0.000107577,0,-0.56
0.400051,0,0.00207699,0,-0.64
7.22489,0,0.0366662,0,-0.72
42.8737,0,0.330252,0,-0.8
Data save completed.
Do you want to perform measurement again?
Ag415x.ErrorQuery(err, msg) ’36
If err <> 0 Then Ag415x.ZeroOutput(0) : GoTo Check_err
Ag415x.Force(t(1), Hp4156b.ModeEnum.VoltageOutput, 0, vb, ibcomp, 0) ’38
Ag415x.Force(t(2), Hp4156b.ModeEnum.VoltageOutput, 0, vc, iccomp, 0)
Ag415x.StartMeasure(Hp4156b.MeasTypeEnum.MmPsweep, mch, mode, range,
Hp4156b.SourceEnum.SourceDataOutput)
For i = 0 To nop1 - 1 ’42
Ag415x.ReadData(eod, dtype, mdata, stat, ch)
data(j, i) = Chr(13) & Chr(10) & mdata * 1000 & "," & stat ’t(2)=collector
Ag415x.ReadData(eod, dtype, mdata, stat, ch)
data(j, i) = data(j, i) & "," & mdata * 1000 & "," & stat ’t(1)=base
Ag415x.ReadData(eod, dtype, mdata, stat, ch)
data(j, i) = data(j, i) & "," & mdata ’t(0)=emitter
Next i
Ag415x.ZeroOutput(0) ’51
save_data(fname, title, val, data, nop1, nop2, Ag415x)
Check_err: ’54
If err <> 0 Then MsgBox("Instrument error: " & err & Chr(10) & msg, vbOKOnly, "")
End Sub
Line Description
36 to 37 Checks if an error occurred. If an error is detected, forces 0 V and goes to Check_err.
38 to 40 Applies voltage to device and performs multi channel pulsed sweep measurement.
42 to 49 Stores the data into the data valiable.
51 to 52 Applies 0 V from the all channels. And transfers the data stored in the data variable to the
save_data subprogram (see Table 4-1). And the subprogram will save the data into the
C:\Agilent\data\data9.txt file (CSV) and displays the data on a message box.
54 to 55 Displays a message box to show an error message if the error is detected.