Tricks
1) Make your computer speak what you type
Steps
1.Open Notepad.
2.Copy and paste the exact code given below.
Dim Message, Speak
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
Message=InputBox("Enter text","Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
3. Click on File Menu, Save As, select All Types in Save as Type option, and save the file as Speak.vbs or "*.vbs".
4. Double click on the saved file, a window will open like the one in the image. Enter some text in enter text column and click OK.
Now your Computer will speak / talk what you typed in Step 4. Try it yourself.
2)Keyboard Disco
Keyboards usually have small LEDs which indicate whether different types of locks are activated or not. Here is a trick to use the lights of your keyboard in a more creative manner in Windows.
This trick uses a simple Visual Basic Script which when activated makes your Scroll lock, Caps lock and Num lock LEDs flash in a cool rhythmic way which gives the perception of a live disco on your keyboard.
To make your own live disco, follow the steps given below:-
1. Open Notepad.
2. Copy paste the exact code given below:-
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
3. Save the file as Disco.vbs or "*.vbs".
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
3. Save the file as Disco.vbs or "*.vbs".
Cool Keyboard Tricks
Double click on the Saved file to see the LED lights on your keyboard go crazy and make your own cool disco.
This trick has been tested on Windows XP, Windows Vista, Windows 7 and Windows 8 and found to be working perfectly.
You can disable the keyboard disco by starting Task Manager and ending the wscript.exe process.