Visa Example In Visual Basic .Net - Agilent Technologies InfiniiVision 3000 Programmer's Manual

X-series
Hide thumbs Also See for InfiniiVision 3000:
Table of Contents

Advertisement

VISA Example in Visual Basic .NET

To compile and run this example in Microsoft Visual Studio 2008:
1
2
3
4
5
6
For more information, see the tutorial on using VISA in Microsoft .NET in
the VISA Help that comes with Agilent IO Libraries Suite 15.
'
' Agilent VISA Example in Visual Basic .NET
' -------------------------------------------------------------------
' This program illustrates a few commonly-used programming
' features of your Agilent oscilloscope.
' -------------------------------------------------------------------
Imports System
Imports System.IO
Imports System.Text
Namespace InfiniiVision
Agilent InfiniiVision 3000 X-Series Oscilloscopes Programmer's Guide
Open Visual Studio.
Create a new Visual Basic, Windows, Console Application project.
Cut- and- paste the code that follows into the Visual Basic .NET source
file.
Edit the program to use the VISA address of your oscilloscope.
Add Agilent's VISA header file to your project:
Right- click the project you wish to modify (not the solution) in the
a
Solution Explorer window of the Microsoft Visual Studio
environment.
Choose Add and then choose Add Existing Item...
b
Navigate to the header file, visa32.vb (installed with Agilent IO
c
Libraries Suite and found in the Program Files\IVI Foundation\VISA\
WinNT\include directory), select it, but do not click the Open
button.
Click the down arrow to the right of the Add button, and choose Add
d
as Link.
You should now see the file underneath your project in the Solution
Explorer. It will have a little arrow icon in its lower left corner,
indicating that it is a link.
Right- click the project again and choose Properties; then, select
e
"InfiniiVision.VisaInstrumentApp" as the Startup object.
Build and run the program.
Class VisaInstrumentApp
Private Shared myScope As VisaInstrument
Public Shared Sub Main(ByVal args As String())
Try
myScope = _
Programming Examples
1161
39

Advertisement

Table of Contents
loading

Table of Contents