Maybe you show what you tried...
No idea about vbs, but after google and tried this ....
Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
objShell.Run("""C:\Windows\System32\notepad.exe""")
Set objShell = Nothing
... and it works fine for me ;)