1148 Agilent InfiniiVision 3000 X-Series Oscilloscopes Programmer's Guide
40 Programming Examples
VISA COM Examples
• "VISA COM Example in Visual Basic" on page 1148
• "VISA COM Example in C#" on page 1157
• "VISA COM Example in Visual Basic .NET" on page 1166
• "VISA COM Example in Python" on page 1174
VISA COM Example in Visual Basic
To run this example in Visual Basic for Applications (VBA):
1 Start the application that provides Visual Basic for Applications (for
example, Microsoft Excel).
2 Press ALT+F11 to launch the Visual Basic editor.
3 Reference the Agilent VISA COM library:
a Choose Tools>References... from the main menu.
b In the References dialog, check the "VISA COM 3.0 Type Library".
c Click OK.
4 Choose Insert>Module.
5 Cut- and- paste the code that follows into the editor.
6 Edit the program to use the VISA address of your oscilloscope, and save
the changes.
7 Run the program.
'
' Agilent VISA COM Example in Visual Basic
' -------------------------------------------------------------------
' This program illustrates a few commonly-used programming
' features of your Agilent oscilloscope.
' -------------------------------------------------------------------
Option Explicit
Public myMgr As VisaComLib.ResourceManager
Public myScope As VisaComLib.FormattedIO488
Public varQueryResult As Variant
Public strQueryResult As String
' For Sleep subroutine.
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
'
' Main Program
' -------------------------------------------------------------------
Sub Main()