212 Agilent InfiniiVision 5000 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 208
• ":DISPlay:SOURce" on page 216
• ":HARDcopy:INKSaver" on page 251
• ":MERGe" on page 140
• ":PRINt" on page 155
• "*RCL (Recall)" on page 110
• "*SAV (Save)" on page 114
• ":VIEW" on page 162
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 744
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.