Visa Example In Visual Basic - Agilent Technologies InfiniiVision 7000A Series Programmer's Manual

12
Programming Examples
* retrieve_waveform
* ------------------------------------------------------------------
* This function retrieves previously saved waveform data from a
* file called "wave.dat".
*/
void retrieve_waveform(void)
{
}

VISA Example in Visual Basic

To run this example in Visual Basic for Applications:
1
2
3
4
5
6
7
'
' Agilent VISA Example in Visual Basic
' -------------------------------------------------------------------
' This program illustrates a few commonly-used programming
' features of your Agilent oscilloscope.
' -------------------------------------------------------------------
Option Explicit
Public err As Long
Public drm As Long
Public vi As Long
854
FILE *fp;
fp = fopen("c:\\scope\\data\\wave.dat", "rb");
/* Read preamble. */
fread(preamble, sizeof(preamble[0]), 10, fp);
/* Read the waveform data. */
fread(waveform_data, sizeof(waveform_data[0]), (int)preamble[2],
fp);
fclose(fp);
Start the application that provides Visual Basic for Applications (for
example, Microsoft Excel).
Press ALT+F11 to launch the Visual Basic editor.
Add the visa32.bas file to your project:
a Choose File>Import File....
b Navigate to the header file, visa32.bas (installed with Agilent IO
Libraries Suite and found in the Program Files\VISA\winnt\include
directory), select it, and click Open.
Choose Insert>Module.
Cut- and- paste the code that follows into the editor.
Edit the program to use the VISA address of your oscilloscope, and save
the changes.
Run the program.
' Error returned by VISA function calls.
' Session to Default Resource Manager.
' Session to instrument.
Agilent InfiniiVision 7000A Series Oscilloscopes Programmer's Guide