VB没有提供直接读写I/O口的方法。所以只能借助其他语言来编写DLL,然后在VB中调用。
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)如果你在Windows下使用过C/C++,那么编写这样的DLL可能没有什么困难。在C语言里都包括inp和outp函数。可以把下面这段C语言代码(32位)编译生成DLL,然后在VB中调用。
代码如下:
#include #include /*作用:从指定端口读入一个字节 参数:portid端口号 返回值:读入的字节*/ int _stdcall Inport(short portid) { return inp(portid);} /*作用:向指定端口写入一个字节 参数:portid端口号*/ void _stdcall output(short portid,short byte) { outp(portid,byte); } /*作用:从指定端口读入一个字节 参数:portid端口号 返回值:读入的字节*/ int _stdcall Inportw(short portid) { return inpw(portid);} /*作用:向指定端口写入一个字节 参数:portid端口号*/ void _stdcall Outportw(short portid,short word) { outpw(portid,(unsigned short) word); }
注意:这种方法只能用于Windows 95,不能用于Windows NT
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)