1.实验目的与要求
（1）实验目的
1）了解PCI-1711 PCI总线板卡的硬件模板。
2）了解PCI-1711 PCI总线板卡与连接板接口正确连接。
3）熟悉Visual Basic编程环境。
4）学会用VB的OCX控件编程。
（2）要求
1）预习PCI-1711 PCI总线板卡和VB的OCX控件编程内容。
2）确认已安装好PCI-1711 PCI总线板卡。
3）要确保两端针型电缆与板卡和接线端子板连接牢固。
4）确保计算机上已安装研华公司的ActiveDAQ。
2.实验内容
用VB实现PCI-1711 PCI总线板卡的数字量输入、数字量输出控制。
3.实验装置与仪器
1）PCI-1711 PCI总线板卡 1块
2）PCL-10168两端针型电缆 1根
3）ADAM-3968接线端子板 1块
4）研华工控机 1台
6）万用表 1块
4.实验方法与步骤
1）双击Visual Basic图标，如图6-54所示。
2）选择Standard EXE图标，单击【Open】按钮，创建一个新工程，从工程菜单中选择Components，得到Components对话框，从控件列表中选择Advantech ActiveDAQ DI Control和Advantech ActiveDAQ DO Control，如图8-54所示，则该控件出现在Visual Basic工具箱中。
3）在VB布局窗体上分别添加DAQDI、DAQDO控件，并使用其默认名称DAQDI1、DAQDO1。
图8-54 选择DI和DO控件
4）在VB布局窗体上添加三个TextBox控件，并将它们的Name属性分别设置为txtDi-Value、txtDoValue与txtDeviceName。
5）在VB布局窗体上添加四个命令按钮。将其Name属性分别设置为cmdSelectDevice、cmdStartScan、cmdStopScan与cmdWrite。将其Caption属性分别设置为Select Device、Scan、Stop与Write。
6）在VB布局窗体上添加三个标签，将其Caption属性分别设置为Device、Digital Input与Digital Output。
7）设置DAQDO1与DAQDI1控件的属性。
①将DAQDO1控件的Mask属性设置为255。
②将DAQDO1控件的Port属性设置为0。
③将DAQDI1控件的Port属性设置为0。
④将DAQDI1控件的Scantime属性设置为1000。
8）编写程序代码(www.daowen.com)
①双击【Select Device】命令按钮，写下如下程序代码：
Private Sub cmdSelectDevice_Click（）
DAQDI1.SelectDevice
txtDeviceName.Text＝DAQDI1.DeviceName
DAQDO1.DeviceNumber＝DAQDI1.DeviceNumber
End Sub
②双击【Scan】命令按钮，写入如下代码：
Private Sub cmdStartScan_Click（）
DAQDI1.OpenDevice
DAQDI1.EnableByteScan TrueEnd Sub
③双击【Stop】命令按钮，写下如下代码：
Private Sub cmdStopScan_Click（）DAQDI1.EnableByteScan False DAQDI1.CloseDevice End Sub
④在DAQDI1的DAQDI1_OnByteScan事件下，写下如下程序代码：
Private Sub DAQDI1_OnByteScan（ByVal Data As Integer）
txtDiValue.Text＝Data
End Sub
⑤双击【Write】命令按钮，写下如下程序代码：
Private Sub cmdDoWrite_Click（）
DAQDO1.OpenDevice
DAQDO1.ByteOutput Val（txtDoValue.Text）
DAQDO1.CloseDevice
End Sub
9）程序运行，得到图8-55所示的控制界面。
图8-55 数字量控制界面
10）数字量输入实验。0V、电源加在计算机板卡接线端子板DI0、DI1和DGND之间，单击【Scan】按钮，观察数字量输入（Digital Input）值。0V电源加在计算机板卡接线端子板DI0和DGND之间，单击【Scan】按钮，观察数字量输入（Digital Input）值。
11）数字量输出实验。改变数字量输出（Digital Out-put）值，单击【Write】按钮，用万用表测量数字量输出（Digital Output）值。
5.思考题
1）VB中OCX控件编程和DLL编程有何区别。
2）采用OCX控件编程有何便利之处。
6.实验报告要求
1）说明数字量与输入/输出是如何对应的。
2）写出调试好的VB语言程序。
免责声明：以上内容源自网络，版权归原作者所有，如有侵犯您的原创版权请告知，我们将尽快删除相关内容。
