Notepad writing by it Self | VBS | Tutorial

VBS with Just Science

Hey guys
In this good chance, I would like to share something nice to you about VBS (Visual Basic Scripct) tutorial. This is kinda good things. You can make your notepad writing by it self. You can use this simple trick to impress some on or something like to write "I love You" automatically if they click the VBS file. So let's check it out.

Copy this script below

set wshshell = wscript.CreateObject("wscript.shell")
        wshshell.run "Notepad"
        wscript.sleep 2000
        wshshell.AppActivate "Notepad"
        WshShell.SendKeys "H"
        WScript.Sleep 500
        WshShell.SendKeys "e"
        WScript.Sleep 500
        WshShell.SendKeys "y"
        WScript.Sleep 500
        WshShell.SendKeys ","
        WScript.Sleep 500
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "I"
        WScript.Sleep 500
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "L"
        WScript.Sleep 500
        WshShell.SendKeys "o"
        WScript.Sleep 500
        WshShell.SendKeys "v"
        WScript.Sleep 500
        WshShell.SendKeys "e"
        WScript.Sleep 500
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "Y"
        WScript.Sleep 500
        WshShell.SendKeys "o"
        WScript.Sleep 500
        WshShell.SendKeys "u"
        WScript.Sleep 500
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "S"
        WScript.Sleep 500
        WshShell.SendKeys "o"
        WScript.Sleep 500
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "m"
        WScript.Sleep 500
        WshShell.SendKeys "u"
        WScript.Sleep 500
        WshShell.SendKeys "c"
        WScript.Sleep 500
        WshShell.SendKeys "h"
         

See the code above... From line 5 until end you can change the blue color by your own word.
If you want to add some words again, just copy and paste this code below

        WScript.Sleep 500
        WshShell.SendKeys "your word"

The meaning of "500" is the interval of the appearing of next word

The Step :

• Open your notepad
• Copy the script above, then edit it
• Save the script
• Last, change the extension of file. From *.txt become *.vbs
• Ask someone to open it.