1. 下載 inpout32.dll

2. 宣告下面函數於模組內
 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)

3. PortOutAddress = &H378
PortInAddress = &H379

4. Out使用 :
 Out PortOutAddress, OutByte

5. In 使用 :
 InByte = inp(PortInAddress)
 InByte = InByte Xor &H80

Link:
 VB I/O
 VB Printer I/O 使用說明
 Power tools for interfacing : Parallel Port



創作者介紹

樹飛亞流

Sophialiu 發表在 痞客邦 PIXNET 留言(2) 人氣()


留言列表 (2)

發表留言
  • eder1025
  • 對於你PRINTER PORT I/O控制有興趣

    小弟不材最近因為要用軸卡寫步進馬達的控制那我適用VB寫用PRINTER PORT輸出。
    開頭總是最難,我看見你部落格寫得程式碼我略知ㄧ二(最近才開始學VB),可以請你講清楚一些關於送命令給步進馬達然後控制正反等控制的細節嗎?(從第四點開始)
  • 訪客
  • 請問可以控制電腦的I/O孔 嗎 例如切斷電源 或開啟 之類 或是 輸出燈電壓 等的應用 甚至聽說輸出電壓控制RS232 等 LED
找更多相關文章與討論