Download X-Series Signal Generators Programming Guide

Transcript
Creating and Downloading Waveform Files
Programming Examples
Private Sub Download_File()
' The following four lines declare IO objects and instantiate them.
Dim rm As VisaComLib.ResourceManager
Set rm = New AgilentRMLib.SRMCls
Dim SigGen As VisaComLib.FormattedIO488
Set SigGen = New VisaComLib.FormattedIO488
' NOTE: Use the IP address of your signal generator in the rm.Open
declaration
Set SigGen.IO = rm.Open("TCPIP0::000.000.000.000")
Dim data As Byte
Dim iq_data() As Byte
Dim FileHandle As Integer
Dim numPoints As Integer
Dim index As Integer
Dim Header As String
Dim response As String
Dim hiByte As String
Dim loByte As String
Dim strFilename As String
strFilename = "C:\IQ_DataVB" ‘File Name and location on PC
generator’s NVWFM
directory.
'Data will be saved to the signal
‘/USER/WAVEFORM/IQ_DataVB
FileHandle = FreeFile()
On Error GoTo errorhandler
With SigGen
download
310
'Set up the signal generator to accept a
.IO.Timeout = 5000
'Timeout 50 seconds
.WriteString "*RST"
'Reset the signal generator.
Keysight EXG and MXG X-Series Signal Generators Programming Guide