Agilent Technologies 4155C, Руководство пользователя

Страница: 161 / 312

Agilent 4155C/4156C VXIplug&play Driver User’s Guide, Edition 4 4-15
Programming Examples for Visual Basic .NET Users
Synchronous Sweep Measurements
Synchronous Sweep Measurements
This section explains an example subprogram that performs staircase sweep
measurement. This example measures MOSFET Id-Vg characteristics. The
subprogram uses the synchronous sweep source.
Table 4-5 Synchronous Sweep Measurement Example
Sub perform_meas(ByVal Ag415x As Hp4156b) ’1
Dim i As Integer = 0
Dim j As Integer = 0
Dim nop1 As Integer = 11
Dim nop2 As Integer = 1
Dim data(nop2, nop1) As String
Dim val As String = "Vg (V), Id (mA), Status"
Dim fname As String = "C:\Agilent\data\data4.txt"
Dim title As String = "Sweep 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 vpri1 As Double = 0
Dim vpri2 As Double = 3
Dim vsyn1 As Double = 0
Dim vsyn2 As Double = 3
Dim vcon1 As Double = 0
Dim vcon2 As Double = 0
Dim i1comp As Double = 0.01
Dim i2comp As Double = 0.05
Dim hold As Double = 0
Dim delay As Double = 0
Dim s_delay As Double = 0
Dim p1comp As Double = 0
Dim p2comp As Double = 0
Dim rep As Integer = nop1
Dim sc(nop1) As Double
’primary sweep output data
Dim md(nop1) As Double ’sweep measurement data
Dim st(nop1) As Integer ’status data at each step ’34
Ag415x.SetIv(t(1), Hp4156b.ModeEnum4.SingleLinearV, 0, vpri1, vpri2, nop1, hold, delay,
s_delay, i1comp, p1comp)
Ag415x.SetSweepSync(t(0), Hp4156b.ModeEnum.VoltageOutput, 0, vsyn1, vsyn2, i2comp,
p2comp)
Line Description
2 to 11 Declares variables used in the program template. And sets the proper values.
13 to 34 Enables measurement channels. And declares variables and sets the value.
36 to 37 Sets the primary sweep source and the synchronous sweep source.