Agilent Technologies E1445A Bedienungsanleitung Seite 41

  • Herunterladen
  • Zu meinen Handbüchern hinzufügen
  • Drucken
  • Seite
    / 534
  • Inhaltsverzeichnis
  • LESEZEICHEN
  • Bewertet. / 5. Basierend auf Kundenbewertungen
Seitenansicht 40
Dim ShowTimeMsg As String
Dim ErrMsg As String
’ Set error routine
On Error Resume Next
’ Get error message
ErrMsg = igeterrstr(igeterrno())
ShowTimeMsg = "The program generated error message " + Chr$(34) + ErrMsg + Chr$(34) + Chr$(10)
ShowTimeMsg = ShowTimeMsg + "in Sub/Function: " + ChkName + Chr$(10) + Chr$(10)
ShowTimeMsg = ShowTimeMsg + "Press " + Chr$(34) + "OK" + Chr$(34) + " to exit"
MsgBox ShowTimeMsg, 64, "Verif: TimeOut"
Close communication with instrument
Call iclose(Addr)
’ Clean up sicl
Call siclcleanup
’ End program
End
End Sub
Chapter 1 Getting Started 39
Seitenansicht 40
1 2 ... 36 37 38 39 40 41 42 43 44 45 46 ... 533 534

Kommentare zu diesen Handbüchern

Keine Kommentare