Agilent Technologies 4155C, User Manual

Page: 157 / 312

Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4 4-11
Programming Examples for Visual Basic .NET Users
Multi-Channel Spot Measurements
Measurement
Result Example
Ic (mA), Status_c, Ib (mA), Status_b, hfe
3.79141, 0, 0.0187544, 0, 202.161092863541
Data save completed.
Do you want to perform measurement again?
Ag415x.ErrorQuery(err, msg) ’34
If err <> 0 Then Ag415x.ZeroOutput(0): GoTo Check_err
Ag415x.MeasureM(mch, mode, range, md, st) ’37
data(j, i) = Chr(13) & Chr(10) & md(0) * 1000 & ", " & st(0) & ", "
data(j, i) = data(j, i) & md(1) * 1000 & ", " & st(1) & ", " & md(0) / md(1)
Ag415x.ZeroOutput(0) ’41
save_data(fname, title, val, data, nop1, nop2, Ag415x)
Check_err: ’44
If err <> 0 Then MsgBox("Instrument error: " & err & Chr(10) & msg, vbOKOnly, "")
End Sub
Line Description
34 to 35 Checks if an error occurred. If an error is detected, forces 0 V and goes to Check_err.
37 to 39 Performs multi channel spot measurement. And stores the measured data into the data
valiable.
41 to 42 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\data2.txt file (CSV) and displays the data on a message box.
44 to 45 Displays a message box to show an error message if the error is detected.