计量论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索

[请教]关于GPIB的自动测试编程问题

[复制链接]
oldfish 发表于 2010-9-6 13:53:04 | 显示全部楼层 |阅读模式
想学习一下用VB编程通过GPIB来控制测量仪器,请问有关于这方面的书籍吗?或者这方面比较详细的资料。
多谢达人指点!
 楼主| oldfish 发表于 2010-9-7 23:03:32 | 显示全部楼层
请搞过这方面的前辈指点一下,谢谢
 楼主| oldfish 发表于 2010-9-13 22:36:08 | 显示全部楼层
:( 不晓得该如何入手呀
b7e3 发表于 2010-9-13 22:45:05 | 显示全部楼层
個人覺得用LabView來進行GPIB控制可能更簡單也更實用
 楼主| oldfish 发表于 2010-9-13 22:57:30 | 显示全部楼层
是的,类似平台确实方便,我只是想学习下vb对于控制gpib的编程
jecmeasurement 发表于 2010-9-14 21:31:51 | 显示全部楼层
我也建议用LabView來進行GPIB控制。确实很方便!
 楼主| oldfish 发表于 2010-9-15 20:56:59 | 显示全部楼层
应该有不少前辈做过VB对GPIB的编程吧,指点一下吧,谢谢
DouYa 发表于 2010-11-16 20:24:42 | 显示全部楼层
回复 6# jecmeasurement


    能给点指导吗,
hunter 发表于 2010-11-17 18:25:37 | 显示全部楼层
首先,要简单学习vb,至少要达到简单编程的程度,手里有一半vb编程的书。其次,安装Agilent的IO套件,主要应用在vb与仪器直接的连接及编程时SCPI语言与vb之间的连接,相当于函数库,利用这个函数库,直接将SCPI命令写入vb代码中即可。数据输出,建议使用Excel,比较简单,网上有很多vb和Excel的源代码可以参考。
setup:  'ioDmm1.WriteString("*RST") '初始化设置5720A
        'ioDmm1.WriteString("*RST") '初始化设置5720A
        ioDmm2.WriteString("*RST")                     ' Reset the dmm
        ioDmm2.WriteString("*CLS")                     ' Clear dmm status registers

DCV100mv:
        Dim i As Integer
        ioDmm2.WriteString(":conf:Volt:dC 10,0.1,") '初始化设置34401A
        ioDmm2.WriteString(":conf:Volt:dC:NPLC 10")
        ioDmm2.WriteString("TRIGger:SOURce IMMediate")
        ioDmm2.WriteString("TRIGger:DELay 10")
        ioDmm2.WriteString("SAMPle:COUNt 1")
        'ioDmm1.WriteString("out 10 mv")
        'ioDmm1.WriteString("oper")
        
以上程序,'ioDmm1.WriteString(xxxx), ioDmm1 为自定义变量,WriteString就是Agilent IO套件的函数,(xxxx)就是cspi命令

以下是34401A的部分命令
Measurement Commands
MEASure:CAPacitance? [{<range>|AUTO|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure:CONTinuity?

MEASure:CURRent:AC? [{<range>|AUTO|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure:CURRent[:DC]? [{<range>|AUTO|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure:DIODe?

MEASure:FREQuency? [{<range>|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure:FRESistance? [{<range>|AUTO|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure:PERiod? [{<range>|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure:RESistance? [{<range>|AUTO|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure:TEMPerature? {FRTD|RTD|THERmistor|DEF}, {<type>|DEF} [,1 [,{<resolution>|MIN|MAX|DEF}] ]

MEASure[:VOLTage]:AC? [{<range>|AUTO|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]

MEASure[:VOLTage][:DC]? [{<range>|AUTO|MIN|MAX|DEF} [,{<resolution>|MIN|MAX|DEF}] ]



希望对你有用
DouYa 发表于 2010-11-22 19:58:29 | 显示全部楼层
回复 9# hunter


    顺便问一下34401A还有5700的命令在哪找得到呢,
 楼主| oldfish 发表于 2010-12-1 22:52:40 | 显示全部楼层
首先,要简单学习vb,至少要达到简单编程的程度,手里有一半vb编程的书。其次,安装Agilent的IO套件,主要 ...
hunter 发表于 2010-11-17 18:25



    多谢,我先研究下,不懂再请教啊
caohua 发表于 2010-12-22 08:33:27 | 显示全部楼层
GPIB我没学过我现在只会用VC对串口的操作和对USB口的操作,有兴趣可以砌磋一下
tanfootball 发表于 2010-12-22 16:57:40 | 显示全部楼层
我們也在搞自動話,准備用的是NI公司的LabView平台。不過價格不便宜。
叮当许 发表于 2010-12-26 14:49:07 | 显示全部楼层
回复  hunter


    顺便问一下34401A还有5700的命令在哪找得到呢,
DouYa 发表于 2010-11-22 19:58



   
同问
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|计量论坛 ( 闽ICP备06005787号-1—304所 )
电话:0592-5613810 QQ:473647 微信:gfjlbbs闽公网安备 35020602000072号

GMT+8, 2024-5-4 02:03

Powered by Discuz! X3.4

Copyright © 2001-2023, Tencent Cloud.

快速回复 返回顶部 返回列表