{كود لإيقاف الفأرة و لوحة المفاتيح}
![]() | ![]() | |
Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private Sub Form_Activate() DoEvents BlockInput True Sleep 1000 BlockInput False End Sub | ||
![]() | ![]() |
___________
بعد نسخ الكود الى المفكرة احفظه بأي اسم شرط أن يكون الإمتداد
html or vbs
_______
حمزة "الأسد" الشحادة أبو جراد
المفرق-الأردن










ليست هناك تعليقات:
إرسال تعليق