Technical data

260 Agilent InfiniiVision 6000 Series Oscilloscopes Programmer's Guide
5 Commands by Subsystem
Return Format <display data><NL>
<display data> ::= binary block data in IEEE-488.2 # format.
See Also • "Introduction to :DISPlay Commands" on page 256
• ":DISPlay:SOURce" on page 264
• ":HARDcopy:INKSaver" on page 299
• ":MERGe" on page 170
• ":PRINt" on page 185
• "*RCL (Recall)" on page 139
• "*SAV (Save)" on page 143
• ":VIEW" on page 192
Example Code
' IMAGE_TRANSFER - In this example, we will query for the image data
' with ":DISPLAY:DATA?", read the data, and then save it to a file.
Dim byteData() As Byte
myScope.IO.Timeout = 15000
myScope.WriteString ":DISPLAY:DATA? BMP, SCREEN, COLOR"
byteData = myScope.ReadIEEEBlock(BinaryType_UI1)
' Output display data to a file:
strPath = "c:\scope\data\screen.bmp"
' Remove file if it exists.
If Len(Dir(strPath)) Then
Kill strPath
End If
Close #1 ' If #1 is open, close it.
Open strPath For Binary Access Write Lock Write As #1 ' Open file f
or output.
Put #1, , byteData ' Write data.
Close #1 ' Close file.
myScope.IO.Timeout = 5000
Example program from the start: "VISA COM Example in Visual Basic" on
page 824
NOTE
If the format is TIFF, the only valid value area parameter is GRATicule, and the only valid
palette parameter is MONOchrome.
If the format is something other than TIFF, the only valid area parameter is SCReen, and the
only valid values for palette are GRAYscale or COLor.