4-34 Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4
Programming Examples for Visual Basic .NET Users
Stress Force
Stress Force
This section explains an example subprogram that performs stress measurement.
This example measures current of a device that has two high terminals and a low
terminal.
Table 4-13 Stress Force Example
Sub perform_meas(ByVal Ag415x As Hp4156b) ’1
Dim i As Integer = 0
Dim j As Integer = 0
Dim nop1 As Integer = 2
Dim nop2 As Integer = 1
Dim data(nop2, nop1) As String
Dim val As String = "Condition, I1 (mA), Status1, I2 (mA), Status2"
Dim fname As String = "C:\Agilent\data\data12.txt"
Dim title As String = "Stress Test Result:"
Dim msg As String = "No error."
Dim err As Integer = 0
Dim t() As Integer = {1, 2, 3} ’13
Ag415x.SetSwitch(t(0), 1) ’SMU1: t1
Ag415x.SetSwitch(t(1), 1) ’SMU2: t2
Ag415x.SetSwitch(t(2), 1) ’SMU3: low
Dim range As Double = 0
Dim base As Double = 0
Dim stress As Double = 2
Dim bias As Double = 0.1
Dim icomp As Double = 0.1
Dim vlout As Double = 0
Dim ilcomp As Double = 0.1
Dim hold As Double = 0
Dim duration As Double = 5
Dim period As Double = 0.01
Dim status As Integer
Dim md(4) As Double
Dim st(4) As Integer
Ag415x.Force(t(2), Hp4156b.ModeEnum.VoltageOutput, range, vlout, ilcomp, 0) ’32
Ag415x.Force(t(1), Hp4156b.ModeEnum.VoltageOutput, range, bias, icomp, 0)
Ag415x.Force(t(0), Hp4156b.ModeEnum.VoltageOutput, range, bias, icomp, 0)
Ag415x.SpotMeas(t(0), Hp4156b.ModeEnum1.CurrentMeasurement, range, md(0), st(0))
Ag415x.SpotMeas(t(1), Hp4156b.ModeEnum1.CurrentMeasurement, range, md(1), st(1))
Ag415x.ZeroOutput(0)
Line Description
2 to 11 Declares variables used in the program template. And sets the proper values.
13 to 30 Enables measurement channels. And declares variables and sets the value.
32 to 37 Applies voltage to device, performs spot measurement, and applies 0 V from the all channels.