Multiple reference of a word

Idea came from one of my friend who is preparing for GRE, to create a utility which retrieves following when looked for a specific word.

1. Searches in Google 
2. Searches its images
3. Finds out its meaning in hindi
4. Provides some examples relating to the word

Dim oShell
Dim Input
Input = InputBox("Enter Your Word : ","Automated Search")
Set oShell = WScript.CreateObject ("WScript.Shell")

oShell.run "https://www.google.co.in/webhp?hl=en#hl=en&q="& Input &"+meaning"
WScript.Sleep(3000)

oShell.run "https://www.google.co.in/search?site=&tbm=isch&source=hp&q="& Input & "&oq="&Input
WScript.Sleep(1000)

oShell.run "http://shabdkosh.com/hi/translate?e="&Input&"&l=hi"
WScript.Sleep(1000)

oShell.run "http://sentence.yourdictionary.com/"&Input
WScript.Sleep(1000)

Set oShell = Nothing