Bàn phím cũng biết nhảy theo nhạc

Chỉ với vài đoạn mã đơn giản, bạn sẽ làm cho 3 đèn led trên bàn phím phải "nhảy" theo nhạc. Bất cứ loại bàn phím cơ bản nào hiện nay đều có tối thiểu 3 đèn led để thông báo tình trạng tắt bật của các phím Num lock, Caps lock và Scroll lock.
Nội dung trích xuất từ tài liệu:
Bàn phím cũng biết "nhảy" theo nhạc Bàn phím cũng biết nhảy theo nhạcChỉ với vài đoạn mã đơn giản, bạn sẽ làm cho 3đèn led trên bàn phím phải nhảy theo nhạc.Bất cứ loại bàn phím cơ bản nào hiện nay đều có tốithiểu 3 đèn led để thông báo tình trạng tắt bật của cácphím Num lock, Caps lock và Scroll lock.Để làm bàn phím nhấp nháy bạn cần tạo một đoạn mãVisual Basic. Bạn hãy copy đoạn mã dưới đây và dánvào notepad sau đó lưu lại tập tin này với đuôi mởrộng là .vbs. Sau đó bạn bấm đúp chuột vào tập tinvbs này để chạy đoạn mã Visual Basic và thưởngthức thành quả. Dưới đây là các đoạn mã VisualBasic.Đoạn mã này làm cho các đèn LED (Num lock, Capslock và Scroll lock) nhấp nháy một cách ngẫu nhiên. Set wshShell =wscript.CreateObject(WScript.Shell) do wscript.sleep 100 wshshell.sendkeys {CAPSLOCK} wshshell.sendkeys {NUMLOCK} wshshell.sendkeys {SCROLLLOCK} loopĐoạn mã này sẽ làm cho các đèn LED trên bàn phímnhấp nháy theo một trình tự nhất định. Set wshShell =wscript.CreateObject(WScript.Shell) do wscript.sleep 200 wshshell.sendkeys {CAPSLOCK} wscript.sleep 100 wshshell.sendkeys {NUMLOCK} wscript.sleep 50 wshshell.sendkeys {SCROLLLOCK} loopĐể kết thúc quá trình này, bạn hãy bấm tổ hợp phímCtrl + Alt + Delete để vào Task Manager rồi tìm đếnthẻ Processes. Tiếp theo bạn tìm đến tiến trình mangtên wscript.exe rồi bấm vào End Processes để ngắttiến trình này. Một lưu ý nhỏ đó là trước khi chạy tậptin vbs bạn hãy tắt tất cả đèn led trên bàn phím đi đểtránh việc đèn led hiển thị không theo ý muốn.Chúc các bạn thành công! Tham khảo: Techmonk