Keysight Technologies E5260 Series Programming Manual page 118

Table 3-2
Sub perform_meas(ByVal session As IMessage, ByVal t() As Integer)
Dim i As Integer = 0
Dim j As Integer = 0
Dim nop1 As Integer = 1
Dim nop2 As Integer = 1
Dim data(nop2 - 1, nop1 - 1) As String
Dim value As String = "Id (uA), Status, Meas Time (msec)"
Dim fname As String = "C:\Keysight\prog_ex\data1.txt"
Dim title As String = "Measurement Result"
Dim msg As String = "No error."
Dim err As Integer = 0
Dim vd As Double = 3
Dim vg As Double = 1
Dim idcomp As Double = 0.05
Dim igcomp As Double = 0.01
Dim orng As Integer = 0
Dim mrng As Integer = 0
session.WriteString("FMT 1" & vbLf)
session.WriteString("AV 10,1" & vbLf)
session.WriteString("FL 0" & vbLf)
session.WriteString("DV " & t(3) & ",0,0,0.1" & vbLf)
session.WriteString("DV " & t(2) & ",0,0,0.1" & vbLf)
session.WriteString("DV " & t(1) & "," & orng & "," & vg & "," & igcomp & vbLf)
session.WriteString("DV " & t(0) & "," & orng & "," & vd & "," & idcomp & vbLf)
session.WriteString("ERR? 1" & vbLf) : err = session.ReadString(4 + 2)
If err <> 0 Then session.WriteString("DZ" & vbLf) : GoTo Check_err
Line
2 to 11 Declares variables used through the project. And sets the proper values.
13 to 18 Declares variables and sets the value.
20 to 22 Sets the data output format and A/D converter. Also sets the SMU filter off.
23 to 28 Applies voltage to device and checks if an error occurred. If an error is detected, forces
0 V and goes to Check_err.
Programming Examples
High-Speed Spot Measurements
A program example of a high-speed spot measurement is shown below. This
example measures MOSFET drain current. This program uses the TTI command to
measure the current and read the time stamp data.
High-Speed Spot Measurement Example
3- 10 Keysight E5260/E5270 Programming Guide, Edition 4
't(0): Drain
't(1): Gate
't(2): Source
't(3): Substrate
'sets number of samples for 1 data
'sets filter off
'out= 0 V, comp= 0.1 A
'out= 0 V, comp= 0.1 A
Description
'1
'13
'20
'28