R&S ESU Series - Page 398

Operating Manual 1302.6163.12 - 03 4.367
R&S ESU Instrument Functions
RSIB Interface Functions
'and store
' Read out trace data
Call RSDLLilrdTraceReal(ud, TraceData(0), TraceBytes, ibsta, iberr,ibcntl)
Programming examples
In this example, the start frequency of the instrument is queried.
Dim ibsta As Integer
' Status variable
Dim iberr As Integer
' Error variable
Dim ibcntl As Long
' Count variable
Dim ud As Integer
' Handle for measuring instrument
Dim Response As String
' Response string
' Set up connection to measuring instrument
ud = RSDLLibfind("89.10.38.97", ibsta, iberr, ibcntl)
If (ud < 0) Then
' Error treatment
End If
' Send query command
Call RSDLLibwrt(ud, "FREQ:START?", ibsta, iberr, ibcntl)
' Provide space for response
Response = Space$(100)
' Read response from measuring instrument
Call RSDLLibrd(ud, Response, ibsta, iberr, ibcntl)
In this example, a Save/Recall of the instrument setups is performed.
Dim ibsta As Integer
' Status variable
Dim iberr As Integer
' Error variable
Dim ibcntl As Long
' Count variable
Dim ud As Integer
' Handle for measuring instrument
Dim Cmd As String
' Command string