使用VISA编程.pdf

上传人:qwe****56 文档编号:69996695 上传时间:2023-01-13 格式:PDF 页数:9 大小:268.25KB
返回 下载 相关 举报
使用VISA编程.pdf_第1页
第1页 / 共9页
使用VISA编程.pdf_第2页
第2页 / 共9页
点击查看更多>>
资源描述

《使用VISA编程.pdf》由会员分享,可在线阅读,更多相关《使用VISA编程.pdf(9页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。

1、显示 使用使用 VISA 编程编程 概述 起动 VISA 连接 通信 断开 样本程序 有关控制外围设备的其他主题 概述概述 下图示出对具有 VISA 的仪器进行控制的流程。当用可视 Basic 语言(Visual Basic languagee)开发 VISA 程序时,必须回顾一个特殊的编程注意事项(在下面列出的自述文本文件中)。有关VISA程序库的利用以及利用带有E5071A宏程序(E5071A VBA)的VISA的编程注意事项的详情,请参考包含在 IO 程序库光盘(CD-ROM)上的下列文件。visa.hlp(VISA 程序库的在线帮助)。vbreadme.txt(对利用具有 VB 的 V

2、ISA 程序库的注释)。使用使用VISA控制仪器的流程控制仪器的流程 第第 1 步:起动步:起动 VISA 样本程序样本程序 ctrl_ext.vba.中的 90 行处理 VISA 系统起动对话。VISA 的viOpenDefaultRM 功能对 VISA 系统进行初始化和起动。viOpenDefaultRM 功能必须在调用其它 VISA 功能之前执行,而这个功能的参数是起动信息(ctrl_ext.vba 中的 Defrm)。语法语法 viOpenDefaultRM(param)参数参数 参数参数(param)说明说明 起动信息(输出)数据类型数据类型 长整型 第第 2 步:连接步:连接 13

3、0 行处理连接对话。VISA 的 viOpen 功能进行与规定仪器的连接。viOpen 功能返回某个值,使得 VISA 功能可以将其应用于规定仪器,这个功能的参数是起动信息(Defrm)、规定仪器的地址信息(ctrl_ext.vba 中的“GPIB:17:INSTR”)、接入方式(ctrl_ext.vba 中的 0)、超时(ctrl_ext.vba 中的 0)和连接信息(ctrl_ext.vba 中的 Equip)。语法语法 viOpen(param1,param2,param3,param4,param5)参数参数 参数参数(param1)说明说明 起动信息(输入)数据类型数据类型 长整型

4、参数参数(param2)说明说明 规定仪器的地址信息(输入)数据类型数据类型 字符串型 语法语法 GPIB0:gpib address:INSTR USB0:manufacturer ID:model code:serial number:0:INSTR(ex.USB0:2391:2312:MY12345678:0:INSTR)TCPIP0:IP address:inst0:INSTR 参数参数(param3)说明说明 接入方式(输入 0)参数参数(param4)说明说明 超时(输入 0)参数参数(param5)说明说明 连接信息(输出)数据类型数据类型 长整型 第第 3 步步.通信通信 17

5、0 行进行通信对话。VISA 的 viVPrintf 功能将程序消息(GPIB 命令)发送到规定仪器。这个功能的参数是连接信息(Equip)、程序消息(*EDN?)和待格式化变量(ctrl_ext.vba 中的 0)。为了输入/输出 GPIB 命令,主要是利用 viVPrintf 功能和 viVScanf功能信息,但也可以利用其它 VISA 功能。欲知详情,请参考visa.hlp(VISA 程序库的在线帮助)。语法语法 viVPrintf(param1,param2,param3)参数参数 参数参数(param1)说明说明 连接信息(输出)数据类型数据类型 长整型 参数参数(param2)说明

6、说明 发送 GPIB 命令的程序消息时的程序消息,消息结束处要求一个消息终结符(ctrl_ext.vba 中的 Chr$(10)数据类型数据类型 字符串型 参数参数(param3)说明说明 变量待格式化,若不可应用,则输入 0。数据类型数据类型 规定的数据类型 210 行控制接收对话。VISA 的 viVScanf 功能接收来自规定仪器的结果,并将其存储在输出变量中。这个功能的参数是连接信息(ctrl_ext.vba 中的 Equip)、输出变量的格式参数(ctrl_ext.vba 中的%t)和输出变量(ctrl_ext.vba 中的Prod)。语法语法 viVScanf(param1,par

7、am2,param3)参数参数 参数参数(param1)说明说明 连接信息(输入)数据类型数据类型 长整型 参数参数(param2)说明说明 输出变量的格式参数 数据类型数据类型 字符串型 参数参数(param3)说明说明 输出变量(输出)数据类型数据类型 字符串型 第第 4 步:步:断开断开 280 行处理断开对话。VISA 的 viClose 功能将通信中断并使 VISA 系统终结,这个功能的参数是起动信息(ctrl_ext.vba 中的 Defrm)。语法语法 viClose(param)Parameter 参数参数(param)说明说明 起动信息(输入)数据类型数据类型 长整型 样本程

8、序样本程序 用来读出外围设备(仪器)产品信息用来读出外围设备(仪器)产品信息 ctrl_ext.vba 是利用 E5071C 作为系统控制器时,控制通过 USB/GPIB 接口电缆连接的仪器的样本程序。这个 VBA 程序由下列程序模块组成。对象名对象名 模块类型模块类型 内容内容 mdlVisa 标准模块 读出外部仪器的产品信息。模块 1 模块 2 标准模块 利用 VISA 程序库的两个定义文件 当您由 E5071C VBA 来控制外围设备时,利用对仪器提供的 GPIB命令经 VISA 进行通信。相反,当您由 E5071C VBA 来控制仪器本身时,则利用对仪器提供的 COM 对象进行通信。9

9、0 行到行到 100 行行 对 VISA 系统进行初始化和起动,并将起动信息输出到 Defrm 变量。在这个过程期间,若发生差错,程序便转到错误处理程序(320 行到 360 行)。130 行到行到 140 行行 建立与经 GPIB 连接的外部仪器(GPIB 地址:17)的连接,并将连接信息输出到 Equip 变量。在这个过程期间,若发生差错,程序便转到错误处理程序(320行到 360 行)。170 行到行到 180 行行 查询利用 VISA 经 USB/GPIB 接口电缆连接的外部仪器的产品信息,在这个过程期间,若发生差错,程序便转到错误处理程序(320 行到 360 行)。210 行到行到

10、 250 行行 通过 VISA 对产品信息进行检索,并将产品信息输出到 Prod 变量。在消息框中显示读出结果。在这个过程期间,若发生差错,程序便转到错误处理程序(320行到 360 行)。280 行行 中断通信并使 VISA 系统终结。320 行到行到 360 行行 若 VISA 功能发生差错,将显示错误的细节并使程序终结。读出产品信息(读出产品信息(ctrl_ext.vba)10|Sub Main()20|30|Dim status As Long VISA function status return code 40|Dim Defrm As Long Session to Defaul

11、t Resource Manager 50|Dim Equip As Long Session to instrument 60|Dim Prod As String*100 String to receive the result 70|80|Initializes the VISA system.90|status=viOpenDefaultRM(Defrm)100|If(status VI_SUCCESS)Then GoTo VisaErrorHandler 110|120|Opens the session to the specified instrument.130|status=

12、viOpen(Defrm,GPIB0:17:INSTR,0,0,Equip)140|If(status VI_SUCCESS)Then GoTo VisaErrorHandler 150|160|Asks for the instruments product information.170|status=viVPrintf(Equip,*IDN?&Chr$(10),0)180|If(status VI_SUCCESS)Then GoTo VisaErrorHandler 190|200|Reads the result.210|status=viVScanf(Equip,%t,Prod)22

13、0|If(status VI_SUCCESS)Then GoTo VisaErrorHandler 230|240|Displays the result.250|MsgBox Prod 260|270|Closes the resource manager session(which closes everything)280|Call viClose(Defrm)290|300|GoTo Prog_end 310|320|VisaErrorHandler:330|Dim VisaErr As String*200 340|Call viStatusDesc(Defrm,status,VisaErr)350|MsgBox Error:&VisaErr,vbExclamation 360|Exit Sub 370|380|Prog_end:390|400|End Sub

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 技术资料 > 其他杂项

本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知得利文库网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

工信部备案号:黑ICP备15003705号-8 |  经营许可证:黑B2-20190332号 |   黑公网安备:91230400333293403D

© 2020-2023 www.deliwenku.com 得利文库. All Rights Reserved 黑龙江转换宝科技有限公司 

黑龙江省互联网违法和不良信息举报
举报电话:0468-3380021 邮箱:hgswwxb@163.com