完善资料让更多小伙伴认识你,还能领取20积分哦, 立即完善>
我正在使用为E3631A提供的示例代码“Diode Test”。
我能够成功地向E3640A发送命令。 但是,在查询中,例如“Meas:Curr?” 我得到一个VI_ERROR_TMO(80040015)。 请帮忙!下面是部分代码:使用Pwr .WriteString“Syst:Rem”.WriteString“* RST”'重置电源.WriteString“* CLS”'清除所有错误消息.WriteString“Curr”& Str $(范围(“E2”)。值)'设置当前MaX为1amp对于i = 5到15回复=单元格(i,1).WriteString“Volt”& Str $(Cells(i,1))。WRriteString“Output on”'打开输出Pwr.WriteString“Meas:Curr?” delay(0.5)reply = .readstring .WriteString“Output off”'关闭电源 以上来自于谷歌翻译 以下为原文 I'm using the sample code "Diode Test" provided for E3631A. I'm able to send commands to the E3640A successfully. However, on inquires, for example "Meas:Curr?" I get a VI_ERROR_TMO (80040015). Please help! Below is partial code: With Pwr .WriteString "Syst:Rem" .WriteString "*RST" ' Reset the power supply .WriteString "*CLS" ' Clear any error messages .WriteString "Curr " & Str$(Range("E2").Value) ' Set current MaX To 1amp For i = 5 To 15 reply = Cells(i, 1) .WriteString "Volt " & Str$(Cells(i, 1)) .WriteString "Output on" ' Turn on the output Pwr.WriteString "Meas:Curr?" delay (0.5) reply = .readstring .WriteString "Output off" ' Turn off power supply |
|
相关推荐
2个回答
|
|
幽默 - 请在OUTP ON命令后再添加1秒延迟再试一次。
我相信它应该可以解决你的问题。 如果没有,请告诉我。 以上来自于谷歌翻译 以下为原文 Humor - please try again by adding 1s delay after the OUTP ON command. I believe it should resolve your problem. Let me know if it doesn't. |
|
|
|
非常感谢chunhlow。
你的建议奏效了。 你的反应也很快。 以上来自于谷歌翻译 以下为原文 Thanks a lot chunhlow. Your suggestion worked. Your response was fast, also. |
|
|
|
只有小组成员才能发言,加入小组>>
971 浏览 0 评论
2250 浏览 1 评论
2028 浏览 1 评论
1907 浏览 5 评论
2772 浏览 3 评论
753浏览 1评论
关于Keysight x1149 Boundary Scan Analyzer
548浏览 0评论
N5230C用“CALC:MARK:BWID?”获取Bwid,Cent,Q,Loss失败,请问大佬们怎么解决呀
642浏览 0评论
2430浏览 0评论
1486浏览 0评论
小黑屋| 手机版| Archiver| 电子发烧友 ( 湘ICP备2023018690号 )
GMT+8, 2024-9-5 21:23 , Processed in 1.232680 second(s), Total 79, Slave 62 queries .
Powered by 电子发烧友网
© 2015 bbs.elecfans.com
关注我们的微信
下载发烧友APP
电子发烧友观察
版权所有 © 湖南华秋数字科技有限公司
电子发烧友 (电路图) 湘公网安备 43011202000918 号 电信与信息服务业务经营许可证:合字B2-20210191