@inf_persistence:谢谢。
要重现VISA IO库的问题,您可以使用此处记录的viTrigger()请求:[http://literature.cdn.keysight.com/litweb/pdf/5989-6582EN.pdf?id = 1448275]参见图
使用VBA从Excel导致错误的示例代码:Private Sub CommandButton1_Click()Dim ioMgr As VisaComLib.ResourceManager Dim instrument As VisaComLib.FormattedIO488 Dim idn As String Set ioMgr = New VisaComLib.ResourceManager Set instrument = New VisaComLib.FormattedIO488
设置instrument.IO = ioMgr.Open(“USB0”)instrument.WriteString“* IDN?”
idn = instrument.ReadString()ActiveSheet.Cells(1,1)= idn instrument.IO.AssertTrigger End Sub编辑:dpenkler@gmail.com于2015年11月10日9:50 AM编辑:dpenkler@gmail.com于11月
10,2015 9:54 AM
以上来自于谷歌翻译
以下为原文
@inf_persistence:Thanks.
To reproduce the issue with the VISA IO library you can use the viTrigger() request as documented here: [http://literature.cdn.keysight.com/litweb/pdf/5989-6582EN.pdf?id=1448275]
see figure 9 on page 6.
Sample code using VBA from Excel to cause error:
Private Sub CommandButton1_Click()
Dim ioMgr As VisaComLib.ResourceManager
Dim instrument As VisaComLib.FormattedIO488
Dim idn As String
Set ioMgr = New VisaComLib.ResourceManager
Set instrument = New VisaComLib.FormattedIO488
Set instrument.IO = ioMgr.Open("USB0")
instrument.WriteString "*IDN?"
idn = instrument.ReadString()
ActiveSheet.Cells(1, 1) = idn
instrument.IO.AssertTrigger
End Sub
Edited by: dpenkler@gmail.com on Nov 10, 2015 9:50 AM
Edited by: dpenkler@gmail.com on Nov 10, 2015 9:54 AM
@inf_persistence:谢谢。
要重现VISA IO库的问题,您可以使用此处记录的viTrigger()请求:[http://literature.cdn.keysight.com/litweb/pdf/5989-6582EN.pdf?id = 1448275]参见图
使用VBA从Excel导致错误的示例代码:Private Sub CommandButton1_Click()Dim ioMgr As VisaComLib.ResourceManager Dim instrument As VisaComLib.FormattedIO488 Dim idn As String Set ioMgr = New VisaComLib.ResourceManager Set instrument = New VisaComLib.FormattedIO488
设置instrument.IO = ioMgr.Open(“USB0”)instrument.WriteString“* IDN?”
idn = instrument.ReadString()ActiveSheet.Cells(1,1)= idn instrument.IO.AssertTrigger End Sub编辑:dpenkler@gmail.com于2015年11月10日9:50 AM编辑:dpenkler@gmail.com于11月
10,2015 9:54 AM
以上来自于谷歌翻译
以下为原文
@inf_persistence:Thanks.
To reproduce the issue with the VISA IO library you can use the viTrigger() request as documented here: [http://literature.cdn.keysight.com/litweb/pdf/5989-6582EN.pdf?id=1448275]
see figure 9 on page 6.
Sample code using VBA from Excel to cause error:
Private Sub CommandButton1_Click()
Dim ioMgr As VisaComLib.ResourceManager
Dim instrument As VisaComLib.FormattedIO488
Dim idn As String
Set ioMgr = New VisaComLib.ResourceManager
Set instrument = New VisaComLib.FormattedIO488
Set instrument.IO = ioMgr.Open("USB0")
instrument.WriteString "*IDN?"
idn = instrument.ReadString()
ActiveSheet.Cells(1, 1) = idn
instrument.IO.AssertTrigger
End Sub
Edited by: dpenkler@gmail.com on Nov 10, 2015 9:50 AM
Edited by: dpenkler@gmail.com on Nov 10, 2015 9:54 AM
举报