vbs codes

Hi ...i am still learning  codes was trying to convert this bat codes to  vbs codes but i don't know how. can any one help me? this is the example of the bat codes, i really need your help. Thanks bro..:

@echo off
echo Hi guy, what do you want to open?
set/p "cho=>"
if %cho%==facebook start facebook.bat
if %cho%==yahoomail start YahooMail.bat
if %cho%==youtube start youtube.bat
if %cho%==blackboard start blackboard.bat
if %cho%==porno start porno.bat
if %cho%==hacking start hacking.bat
if %cho%==gmail start gmail.bat