inpoutv4.bas

vb对计算机并口的控制.vb可以通过控件对串口控制,但对并口却不能.所以这个例子,方便大家使用并口.

Attribute VB_Name = "inpout"

Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)