嗨马特,我相信我正在使用VISA COM。
这是代码:设置ioMgr =新的VisaComLib.ResourceManagerSet instrK237 =新的VisaComLib.FormattedIO488Set instrK237.IO = ioMgr.Open(“GPIB1 :: 17 :: INSTR”).... instrK237.WriteString“N1X”'设置为OPERiSleep 1000instrK237
.WriteString“H0X”'TRIGGER SWEEPiSleep 50000'UGLY DELAY HERE,根据nA中的低电流测量而变化'如果我在发送下一个cinstrK237之前只能使用OPC查询,我可以在这里循环.WriteString“N0X”'OPER OFFiSleep 1000instrK237.WriteString
“X”iSleep 1000ar1 = CleanString(instrK237.ReadString())'GETS数据arrayThanks和问候
以上来自于谷歌翻译
以下为原文
Hi Matt,
I believe Im using VISA COM. Here's the code:
Set ioMgr = New VisaComLib.ResourceManager
Set instrK237 = New VisaComLib.FormattedIO488
Set instrK237.IO = ioMgr.Open("GPIB1::17::INSTR")
....
instrK237.WriteString "N1X" 'Set to OPER
iSleep 1000
instrK237.WriteString "H0X" 'TRIGGER SWEEP
iSleep 50000 'UGLY DELAY HERE, varies depending on low current meas in nA
'I can loop here if I can only use the OPC query before sending next c
instrK237.WriteString "N0X" 'OPER OFF
iSleep 1000
instrK237.WriteString "X"
iSleep 1000
ar1 = CleanString(instrK237.ReadString()) 'GETS data array
Thanks and regards
嗨马特,我相信我正在使用VISA COM。
这是代码:设置ioMgr =新的VisaComLib.ResourceManagerSet instrK237 =新的VisaComLib.FormattedIO488Set instrK237.IO = ioMgr.Open(“GPIB1 :: 17 :: INSTR”).... instrK237.WriteString“N1X”'设置为OPERiSleep 1000instrK237
.WriteString“H0X”'TRIGGER SWEEPiSleep 50000'UGLY DELAY HERE,根据nA中的低电流测量而变化'如果我在发送下一个cinstrK237之前只能使用OPC查询,我可以在这里循环.WriteString“N0X”'OPER OFFiSleep 1000instrK237.WriteString
“X”iSleep 1000ar1 = CleanString(instrK237.ReadString())'GETS数据arrayThanks和问候
以上来自于谷歌翻译
以下为原文
Hi Matt,
I believe Im using VISA COM. Here's the code:
Set ioMgr = New VisaComLib.ResourceManager
Set instrK237 = New VisaComLib.FormattedIO488
Set instrK237.IO = ioMgr.Open("GPIB1::17::INSTR")
....
instrK237.WriteString "N1X" 'Set to OPER
iSleep 1000
instrK237.WriteString "H0X" 'TRIGGER SWEEP
iSleep 50000 'UGLY DELAY HERE, varies depending on low current meas in nA
'I can loop here if I can only use the OPC query before sending next c
instrK237.WriteString "N0X" 'OPER OFF
iSleep 1000
instrK237.WriteString "X"
iSleep 1000
ar1 = CleanString(instrK237.ReadString()) 'GETS data array
Thanks and regards
举报