4-10 Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4
Programming Examples for Visual Basic .NET Users
Multi-Channel Spot Measurements
Multi-Channel Spot Measurements
This section explains an example subprogram that performs multi channel spot
measurement. This example measures bipolar transistor collector current and base
current.
Table 4-3 Multi-Channel Spot Measurement Example
Sub perform_meas(ByVal Ag415x As Hp4156b) ’1
Dim i As Integer = 0
Dim j As Integer = 0
Dim nop1 As Integer = 1
Dim nop2 As Integer = 1
Dim data(nop2, nop1) As String
Dim val As String = "Ic (mA), Status_c, Ib (mA), Status_b, hfe"
Dim fname As String = "C:\Agilent\data\data2.txt"
Dim title As String = "Spot Measurement Result"
Dim msg As String = "No error."
Dim err As Integer = 0
Dim t() As Integer = {1, 2, 3} ’13
Ag415x.SetSwitch(t(2), 1) ’SMU3: collector
Ag415x.SetSwitch(t(1), 1) ’SMU2: base
Ag415x.SetSwitch(t(0), 1) ’SMU1: emitter
Dim vc As Double = 3 ’18
Dim vb As Double = 0.7
Dim ve As Double = 0
Dim iccomp As Double = 0.1
Dim ibcomp As Double = 0.01
Dim iecomp As Double = 0.1
Dim mch() As Integer = {t(2), t(1), 0}
Dim mode() As Integer = {1, 1} ’current measurement
Dim range() As Double = {0, 0} ’auto range
Dim md(2) As Double
Dim st(2) As Integer
Ag415x.Force(t(0), Hp4156b.ModeEnum.VoltageOutput, 0, ve, iecomp, 0) ’30
Ag415x.Force(t(1), Hp4156b.ModeEnum.VoltageOutput, 0, vb, ibcomp, 0)
Ag415x.Force(t(2), Hp4156b.ModeEnum.VoltageOutput, 0, vc, iccomp, 0)
Line Description
2 to 11 Declares variables used in the program template. And sets the proper values.
13 to 16 Enables measurement channels.
18 to 28 Declares variables and sets the value.
30 to 32 Applies voltage to device.