VB编程如何直接控制I/O口之一

VB编程如何直接控制I/O口之一
一、I/O端口介绍
　　
　　 信号采集与控制是工业控制的最重要组成部分。在工业控制中，通常采集到的信号有两类：一类是电压或电流模拟信号；另一类是开关量或数字脉冲量（开关量、脉冲量都属于数字信号）。通常检测出的信号如果是模拟量的话，必须经过放大、变换变为电压0～10伏或电流0～10mA，这些模拟量必须经过模/数转换器(ADC:Analog-Digital Cnverter)转换成数字量, 才能被计算机所接受。同样输出控制量信号也必须是数字信号,得经过数/模转换器(DAC:Digital-Analog Cnverter),将数字信号转换成模拟信号0～10伏 (或0～+5伏)或变为电流0～10mA, 再送入到控制器去控制生产设备的运行。
　　
　　 而在计算机中，CPU通过总线与输入输出设备相连。系统中的很多其他设备都要通过总线，按照CPU规定的时序分时地与CPU进行指令或数据的传输。因此输入输出设备不能直接与总线相连并占用总线，I/O端口就是在总线和输入输出设备之间进行数据交换的数据中转站，我们与输入输出设备的对话实际上是与I/O端口的对话，下面就详细讲述在Visual BASIC环境下如何进行输出和输入操作。
　　
　　二、编写操作I/O端口的动态链接库函数
　　 Visual BASIC没有提供直接读写I/O端口的方法,所以只能借助其他语言来编写动态链接库DLL（Dynamic Link Library）或VXD，然后再在Visual BASIC中调用。因此我们不得不先了解如何编写操作I/O端口的动态链接库函数。
　　
　　1．在汇编语言中，可以用 in、out 指令操作I/O端口，具体示例如下：
　　输入操作：
　　MOV DX, Port；Port为端口号
　　IN AL, DX；读入端口数据到AL寄存器
　　输出操作：
　　MOV DX, Port；Port为端口号
　　MOV AL, ConByte；ConByte为控制字，将控制字送到AL寄存器
　　OUT DX, AL；送出控制字到端口
　　
　　2．在C/C++中，通常用inp和_outp函数操作I/O端口，编写动态链接库我们可以编写如下两个函数，并把它编译生成DLL：
　　/*作用：从指定端口读入一个字节，参数：portid端口号，返回值：读入的字节*/
　　int _stdcall Inport(short portid)
　　{
　　　return inp(portid);
　　}
　　/*作用：向指定端口写入一个字节，参数：portid端口号*/
　　void _stdcall Outport(short portid,short value)
　　{
　　　outp(portid, value);
　　}
　　 当需要一次操作两个字节时，我们就必须用到inpw和outpw两个函数，具体用法同inp和outp。
　　 同时需要说明的是，_inp和_outp函数和inp和outp函数用法基本上相同，只是在使用时需要头文件，而且本人推荐使用_inp和_outp，而不是使用inp和outp。因为_inp和_outp在Debug和Release都可以使用，而inp和outp只能用于Release设置。如果在Debug设置时使用inp和outp，编译时不会错，但会产生链接错误。
　　
　　
　　三、Visual BASIC中操作I/O端口
　　 到此我们就可以在Visual BASIC中通过动态链接库技术间接操作I/O端口了。在Visual Basic中动态链接库必须提前申明，其缺省为公有过程或函数。其格式为：
　　
　　“Declare Sub 过程名 Lib ‘库名’ [Alias ‘别名’] [(参数表)]”，或者“Declare Function 过程名 Lib ‘库名’ [Alias ‘别名’] [(参数表)] As 类型”。例如：
　　
　　Public Declare Function Outport Lib "vcDll.dll" (ByVal portid As Integer, ByVal value As Integer) As Integer //IO输出函数
　　
　　Public Declare Function Inport Lib "vcDll.dll" (ByVal portid As Integer) As Integer //IO输入函数
　　这样定义后在程序中就可以直接使用上面定义的函数或过程来操作I/O端口了。