如何使用VB.net跟踪捕获

嗨 - 这是一个如何使用VISA-Com从VB.NET中读取分析器ID字符串的示例。
Dim status as Long Dim idn As String Dim drm as Ivi.Visa.Interop.ResourceManager Dim vi as Ivi.Visa.Interop.FormattedIO488 drm = New Ivi.Visa.Interop.ResourceManager vi = New Ivi.Visa.Interop.FormattedIO488'Attempt
连接到信号分析器尝试vi.IO = drm.Open（“GPIB0 :: 18 :: INSTR”）Catch ex As Exception返回False End尝试'从分析器获取IDN字符串status = vi.IO.WriteString（“*
IDN？“+ Chr（10）”如果状态返回False结束如果idn = vi.IO.ReadString（100）要另外回读跟踪数据，您可以通过两种方式执行此操作。
您可以将数据格式更改为Real，64并对数据执行binblock读取。
您还可以将数据读回为逗号分隔数据的ASCII字符串。
binblock读取速度要快得多。
这里基本上是如何在C＃中以binblock格式回读跟踪数据的。
您可以将此代码转换为VB.NET SA.WriteString（“INIT：CONT OFF  n”）;
//将分析仪放入单扫描SA.WriteString（“FORM：DATA REAL，64  n”）;
//将数据类型设置为binblock real，64 SA.WriteString（“INIT：IMM; * OPC？”）;
//进行扫描并等待扫描完成Double opc = SA.Readnumber（IEEEASCIIType.ASCIIType_UI1，true）;
//回读1 SA.WriteString（“TRACE：DATA？TRACE1”）;
double [] trace = new double [1000];
trace = SA.ReadIEEEBlock（IEEEBinaryType.BinaryType_R8，true）;
问候 -



     以下为原文

  Hi -

Here’s an example how to use VISA-Com to read back the ID string from the analyzer in VB.NET.  

Dim status As Long
Dim idn As String
Dim drm as Ivi.Visa.Interop.ResourceManager
Dim vi as Ivi.Visa.Interop.FormattedIO488

drm = New Ivi.Visa.Interop.ResourceManager
vi = New Ivi.Visa.Interop.FormattedIO488

'Attempt to connect to the Signal Analyzer
Try
vi.IO = drm.Open("GPIB0::18::INSTR")
Catch ex As Exception
Return False
End Try

'Get IDN String from the analyzer
status = vi.IO.WriteString("*IDN?" + Chr(10))
If status < Ivi.Visa.Interop.VisaStatusCode.S_VISA_SUCCESS Then
Return False
End If
idn = vi.IO.ReadString(100)

To additionally read back the trace data, you can do this two ways.  You can change the data format to Real,64 and do a binblock read of the data.  You can also, read back the data as an ASCII string of comma separated data.  The binblock read is much faster.

Here’s basically how you would read back the trace data in binblock format in C#.  You can convert this code to VB.NET

SA.WriteString("INIT:CONT OFFn");  // put the analyzer in single sweep
SA.WriteString("FORM:DATA REAL,64n");  // set the data type to binblock real,64
SA.WriteString("INIT:IMM;*OPC?");  // take a sweep and wait for the sweep to complete
Double opc = SA.Readnumber(IEEEASCIIType.ASCIIType_UI1, true);  // read back 1
SA.WriteString(“TRACE:DATA? TRACE1”);
double[] trace = new double[1000];
trace = SA.ReadIEEEBlock(IEEEBinaryType.BinaryType_R8, true);

Regards -