กระดานแสดงความคิดเห็น
Home
Contents
Articles
Quiz
Members
Sponsor
Print-friendly
MENU
ปรับปรุง : 2566-10-15 (กระดานแสดงความคิดเห็น)
เว็บเพจหน้านี้สำหรับผู้ดูแลเท่านั้น
รหัส secure
=>
นำตัวอักษร สีขาวบนพื้นแดง มาป้อนในช่องนี้
edit_topic_password =>
<center><table width=90% border=0 bgcolor=#000080><tr><td><font color=white size=4>ตัวอย่าง VB ที่ใช้หยุดแป้นพิมพ์</td></tr></table><table width=90% bordercolor=#000080 border=1><tr><td bgcolor=white><br>Option Explicit<br /> <br /> Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long<br /> Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)<br /> <br /> Private Sub Form_Activate()<br /> 'KPD-Team 2000<br /> 'URL: http://www.allapi.net/<br /> 'E-Mail: KPDTeam@Allapi.net<br /> DoEvents<br /> 'block the mouse and keyboard input<br /> BlockInput True<br /> 'wait 10 seconds before unblocking it<br /> Sleep 10000 ' for 10 seconds<br /> 'unblock the mouse and keyboard input<br /> BlockInput False<br /> Unload Me<br /> End Sub<br><br></td></tr><tr><td align=right bgcolor=black><font color=white><small><b>จากคุณ :</b> บุรินทร์ <a href=mailto:></a><a title='202.29.78.18'>.</a><br> 10:11pm (26/06/06)</font></td></tr></table></center>