งานครั้งที่ 10 การประกอบวงจรและเขียนโปรแกรมรับค่าจากสวิตช์

[admin]

-ประกอบวงจรรับค่าจากสวิตช์
-เขียนโปรแกรมรับสวิตช์โดยแสดงผลเป็นหลอดไฟดังรูป




รูป LED (On-Off)

[admin]

 เมื่อต้องการใช้คำสั่งรับข้อมูลจากพอร์ต ต้องประกาศการใช้งานก่อนเขียนโปรแกรมดังนี้

โค๊ด: [Select]

Private Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer 

รูปแบบการใช้งาน
ตัวแปรรับค่า = inp (เบอร์พอร์ต)
ตัวอย่างเช่น
 value=inp(&H379)

*ใบงานนี้มีการส่งค่าเพื่อออกพอร์ตดังนี้นี้ใช้ฟังก์ชั่น Out ด้วย

โค๊ด: [Select]

Private Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)