Keysight E4981A Programming Manual page 151

Measurement Applications (Sample Programs)
Measuring Results with Contact Check Enabled
'===================================
' Setup End
'===================================
ErrorCheck viClose(Agte4981a)
ErrorCheck viClose(defrm)
End
'===================================
' ErrorProc
'===================================
ErrorHandler:
' Display the error message
MsgBox "*** Error : " + Error$, MB_ICON_EXCLAMATION
End
End Sub
Keysight E4981A 120 Hz/1 kHz/1 MHz Capacitance Meter 151