Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4 4-19
Programming Examples for Visual Basic .NET Users
Pulsed Spot Measurements
Pulsed Spot Measurements
This section explains an example subprogram that performs pulsed spot
measurement. This example measures MOSFET drain current.
Table 4-7 Pulsed 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 = "Id (mA), Status"
Dim fname As String = "C:\Agilent\data\data6.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, 4} ’13
Ag415x.SetSwitch(t(3), 1) ’SMU4: substrate
Ag415x.SetSwitch(t(2), 1) ’SMU3: source
Ag415x.SetSwitch(t(1), 1) ’SMU2: gate
Ag415x.SetSwitch(t(0), 1) ’SMU1: drain
Dim vd As Double = 0.5
Dim vg As Double = 0.5
Dim idcomp As Double = 0.05
Dim igcomp As Double = 0.01
Dim base As Double = 0
Dim width As Double = 0.001
Dim period As Double = 0.01
Dim hold As Double = 0.1
Dim meas As Double
Dim status As Integer
Ag415x.SetFilter(t(1), Hp4156b.StateEnum2.FilterOff) ’30
Ag415x.SetPbias(t(1), Hp4156b.ModeEnum5.VoltagePulse, 2, base, vg, width, period,
hold, igcomp)
Ag415x.ErrorQuery(err, msg)
If err <> 0 Then Ag415x.ZeroOutput(0) : GoTo Check_err
Line Description
2 to 11 Declares variables used in the program template. And sets the proper values.
13 to 28 Enables measurement channels. And declares variables and sets the value.
30 to 31 Sets the filter off for the pulse output channel and sets the pulse voltage source.
32 to 33 Checks if an error occurred. If an error is detected, forces 0 V and goes to Check_err.