Agilent Technologies B1500A Manuel de service Page 281

  • Télécharger
  • Ajouter à mon manuel
  • Imprimer
  • Page
    / 598
  • Table des matières
  • MARQUE LIVRES
  • Noté. / 5. Basé sur avis des utilisateurs
Vue de la page 280
Agilent B1500A/B1505A Programming Guide, Edition 11 3-103
Programming Examples
C-t Sampling Measurements
MsgBox("Connect DUT. Then click OK.", vbOKOnly, "") 63
session.WriteString("MTDCV " & bias_h & "," & interval & "," & nop1 & "," & base_h
& vbLf)
session.WriteString("MDCV " & t(1) & "," & base & "," & bias & ",0" & vbLf)
session.WriteString("MM 26," & t(1) & vbLf)
session.WriteString("IMP 100" & vbLf)
session.WriteString("RC " & t(1) & "," & range & vbLf)
session.WriteString("ERR? 1" & vbLf) : err = session.ReadString(4 + 2)
If err <> 0 Then session.WriteString("DZ" & vbLf) : GoTo Check_err
session.WriteString("TSR" & vbLf)
session.WriteString("XE" & vbLf)
session.WriteString("*OPC?" & vbLf) : rep = session.ReadString(1 + 2) ’73
session.WriteString("ERR? 1" & vbLf) : err = session.ReadString(4 + 2)
If err <> 0 Then session.WriteString("DZ" & vbLf) : GoTo Check_err
session.WriteString("NUB?" & vbLf) : rep = session.ReadString(3 + 2)
If rep <> nop1 * 4 Then session.WriteString("DZ" & vbLf) : GoTo Check_nop ’77
Dim mret As String = session.ReadString(16 * 4 * nop1 + 2) ’4*nop1 + terminator
For i = 0 To nop1 - 1
st(i * 2) = Mid(mret, i * 16 * 4 + 16 * 2 + 1, 3)
st(i * 2 + 1) = Mid(mret, i * 16 * 4 + 16 * 3 + 1, 3)
sc(i) = Val(Mid(mret, i * 16 * 4 + 4, 12))
tm(i) = Val(Mid(mret, i * 16 * 4 + 16 * 1 + 4, 12))
md(i * 2) = Val(Mid(mret, i * 16 * 4 + 16 * 2 + 4, 12))
md(i * 2 + 1) = Val(Mid(mret, i * 16 * 4 + 16 * 3 + 4, 12))
data(j, i) = Chr(13) & Chr(10) & sc(i) & "," & md(i * 2) * 1000000000000.0 & ","
& st(i * 2)
data(j, i) = data(j, i) & "," & md(i * 2 + 1) * 1000000.0 & "," & st(i * 2 + 1)
& "," & tm(i)
Next i ’89
session.WriteString("DZ" & vbLf)
save_data(fname, title, value, data, nop1, nop2, session, t)
Exit Sub
Line Description
63 Displays a message box that asks you to connect the device to the measurement terminal.
Then the CMUH and CMUL must be connected to the gate terminal and the substrate
terminal respectively.
64 to 72 Sets the measurement condition, resets the time stamp, and performs the measurement.
73 to 77 Waits until the measurement is completed. After that, if an error is detected, forces 0 V and
goes to Check_err. Also if the number of returned data is not correct, forces 0 V and goes to
Check_nop.
79 to 89 Stores the returned data into the mret string variable. Finally, stores the measured data into
the data array.
90 to 92 Applies 0 V from all channels. And transfers the data stored in the data variable to the
save_data subprogram (see Table 3-1). And the subprogram will save the data into a CSV
file specified by the fname variable and displays the data on a message box.
Vue de la page 280
1 2 ... 276 277 278 279 280 281 282 283 284 285 286 ... 597 598

Commentaires sur ces manuels

Pas de commentaire