Agilent Technologies E1445A Manual de usuario Pagina 41

  • Descarga
  • Añadir a mis manuales
  • Imprimir
  • Pagina
    / 534
  • Tabla de contenidos
  • MARCADORES
  • Valorado. / 5. Basado en revisión del cliente
Vista de pagina 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
Vista de pagina 40
1 2 ... 36 37 38 39 40 41 42 43 44 45 46 ... 533 534

Comentarios a estos manuales

Sin comentarios