Keysight E3633A, User Manual

Page: 180 / 205

6 Application Programs
180 Keysight E3633A and E3634A User’s Guide
Declaration for Windows 3.1
'******************************************************************************
' This routine requires the file VISA.dll. It typically resides in the
' c:\windows\system directory. Additional declations for VISA.DLL are usally in
' file visa.bas under c:\vxipnp\win31\include directory on your PC. This routine
' uses the VTL Library to send commands to an instrument. A description of these
' and additional VTL commands are contained in the Hewlett Packard Visa
' Transition Library book Keysight Part Number E2094-90002.
'*****************************************************************************
Declare Function viOpenDefaultRM Lib "VISA.DLL" Alias "#141" (viDefaultRM As
Long) As Long
Declare Function viOpen Lib "VISA.DLL" Alias "#131" (ByVal viDefaultRM As Long,
ByVal viDesc As String, ByVal mode As Long, ByVal timeout As Long, vi As Long) As
Long
Declare Function viClose Lib "VISA.DLL" Alias "#132" (ByVal vi As Long) As Long
Declare Function viRead Lib "VISA.DLL" Alias "#256" (ByVal vi As Long, ByVal
Buffer As String, ByVal count As Long, retCount As Long) As Long
Declare Function viWrite Lib "VISA.DLL" Alias "#257" (ByVal vi As Long, ByVal
Buffer As String, ByVal count As Long, retCount As Long) As Long
Declare Function viClear Lib "VISA.DLL" Alias "#260" (ByVal vi As Long) As Long
Declaration for Windows 9.5/NT 4.0
'******************************************************************************
' Additional declations for VISA32.DLL are usally in file visa32.bas under
' c:\vxipnp\win95(or winNT)\include directory on your PC. Also see the VISA
' manual
'*****************************************************************************
Declare Function viOpenDefaultRM Lib "visa32.dll" (instrumentHandle As Long) As
Long
Declare Function viOpen Lib "visa32.dll" (ByVal instrumentHandle As Long, _
ByVal viDesc As String, ByVal mode As Long, ByVal timeout As Long, _vi As Long)
As Long
Declare Function viClose Lib "visa32.dll" (ByVal vi As Long) As Long
Declare Function viWrite Lib "visa32.dll" (ByVal vi As Long, ByVal Buffer As
String, _ ByVal count As Long, retCount As Long) As Long
Declare Function viRead Lib "visa32.dll" (ByVal vi As Long, ByVal Buffer As
String, _ByVal count As Long, retCount As Long) As Long