Agilent Technologies B1500A Uživatelská příručka Strana 155

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 208
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 154
Agilent B1500 VXIplug&play Driver Users Guide, Edition 3 3-61
Programming Examples for Visual Basic Users
Leakage Current Measurement
Measurement
Result Example
Id = 12.775 (mA)
Do you want to perform measurement again?
Sub display_data(meas As Double, status As Long, vi As Long, ret
As Long, pins() As Long)
Dim title As String ’3
Dim value As String
Dim rbx As Integer
title = "Ileak Measurement Result" ’6
If status = 0 Then ’8
value = "Id = " & meas * 1000 & " (mA)" & Chr(10) & Chr(10)
value = value & "Do you want to perform measurement again?"
rbx = MsgBox(value, vbYesNo + vbQuestion, title)
If rbx = vbYes Then
spot_meas vi, ret, pins()
End If
Else
value = "Status error. Code = " & status
MsgBox value, vbOKOnly, title
End If ’18
End Sub
Line Description
1 Beginning of the display_data subprogram.
3 to 6 Declares variables, and defines the value.
8 to 18 Displays measurement data on a message box if the
measurement status is normal. If Yes is clicked on the message
box, performs the spot_meas subprogram again. If No is
clicked, returns to the perform_meas subprogram.
Or displays error message on a message box if the status is
abnormal.
20 End of the display_data subprogram.
Zobrazit stránku 154
1 2 ... 150 151 152 153 154 155 156 157 158 159 160 ... 207 208

Komentáře k této Příručce

Žádné komentáře