كيفية جعل أضواء لوحة المفاتيح للكمبيوتر مجنونة

1. فتح المفكرة .
2. نسخ هذه الرموز إلى المفكرة.

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop 

3. تم حفظ بأنها. ملف  VBS . متل  Crazy keyboard .vbs

4. انقر نقرا مزدوجا على الملف الذي تم إنشاؤه.