Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4 4-9
Programming Examples for Visual Basic .NET Users
High-Speed Spot Measurements
Measurement
Result Example
Id (mA), Status
3.91571, 0
Data save completed.
Do you want to perform measurement again?
Ag415x.SpotMeas(t(0), 1, 0, meas, status) ’current measurement 33
data(j, i) = Chr(13) & Chr(10) & meas * 1000 & ", " & status
Ag415x.ZeroOutput(0) ’36
save_data(fname, title, val, data, nop1, nop2, Ag415x)
Check_err: ’39
If err <> 0 Then MsgBox("Instrument error: " & err & Chr(10) & msg, vbOKOnly, "")
End Sub
Line Description
33 to 34 Performs spot measurement. And stores the measured data into the data valiable.
36 to 37 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\data1.txt file (CSV) and displays the data on a message box.
39 to 40 Displays a message box to show an error message if the error is detected.