vb6.0控制print接口

控件源代碼進行聲明：

Private Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Private Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal value As Integer)　　//調用inpout32.dll文件進出數據接口

 

調用方法：

Public Function add(ByVal value As Integer)
Out &H378, Val(value)
End Function　　　　　//錄入值進行數據控制

 

調用方法add()就可以控制print接口

 

转载于:https://blog.51cto.com/jack08/71893