4-20 Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4
Programming Examples for Visual Basic .NET Users
Pulsed Spot Measurements
Measurement
Result Example
Id (mA), Status
3.8789, 0
Data save completed.
Do you want to perform measurement again?
Ag415x.Force(t(3), Hp4156b.ModeEnum.VoltageOutput, 0, 0, 0.05, 0) ’35
Ag415x.Force(t(2), Hp4156b.ModeEnum.VoltageOutput, 0, 0, 0.05, 0)
Ag415x.Force(t(0), Hp4156b.ModeEnum.VoltageOutput, 2, vd, idcomp, 0)
Ag415x.MeasureP(t(0), Hp4156b.ModeEnum1.CurrentMeasurement, 0, meas, status)
data(j, i) = Chr(13) & Chr(10) & meas * 1000 & ", " & status ’40
Ag415x.ZeroOutput(0) ’42
save_data(fname, title, val, data, nop1, nop2, Ag415x)
Check_err: ’45
If err <> 0 Then MsgBox("Instrument error: " & err & Chr(10) & msg, vbOKOnly, "")
End Sub
Line Description
35 to 38 Applies voltage to device and performs pulsed spot measurement.
40 Stores the measured data into the data valiable.
42 to 43 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\data6.txt file (CSV) and displays the data on a message box.
45 to 46 Displays a message box to show an error message if the error is detected.