Agilent Technologies E5071C Betriebsanweisung Seite 182

  • Herunterladen
  • Zu meinen Handbüchern hinzufügen
  • Drucken
  • Seite
    / 551
  • Inhaltsverzeichnis
  • LESEZEICHEN
  • Bewertet. / 5. Basierend auf Kundenbewertungen
Seitenansicht 181
182 Chapter 12
Sample Application Programs
Controlling Using SICL-LAN Server
(4) retrieves the message terminator at the end of the data.
Example 12-5 EnterSiclLanArrayReal64
Function EnterSiclLanArrayReal64(addr As Integer, databuf() As Double)
As Long
Dim Status As Integer
Dim actualcnt As Long
Dim buf As String * 8
Dim size As Long
On Error GoTo ErrHandler
'''Read header info of "#6NNNNNN"
Status = iread(addr, buf, 8, I_TERM_MAXCNT, actualcnt)
'.................(1)
size = Val(Mid$(buf, 3, 6))
'.................(2)
'''Read data
Status = iread(addr, databuf, size, I_TERM_MAXCNT, actualcnt)
'.................(3)
'''Read ending LF
Status = iread(addr, buf, 1, I_TERM_MAXCNT, actualcnt)
'.................(4)
EnterSiclLanArrayReal64 = size / 8
Exit Function
ErrHandler:
MsgBox "*** Error : " & Error$
Call siclcleanup
End
End Function
Disconnection
The iclose function of SICL is used to disconnect communication. The iclose function
takes the session information outputted from the iopen function as its parameter.
Syntax Status = iclose(addr)
For information on the variable (Status) and the variable (addr), refer to Table 12-1,
“Variable (Status),” on page 179 and Table 12-2, “Variable (addr),” on page 179,
respectively.
Seitenansicht 181
1 2 ... 177 178 179 180 181 182 183 184 185 186 187 ... 550 551

Kommentare zu diesen Handbüchern

Vikiehs 04 Jan 2024 | 13:20:06

urenrjrjkvnm