Build url with double quotes

[most]

I'm running crazy on this, why doesn't example two work?

 Dim oShell As Object
 Set oShell = CreateObject("Wscript.Shell")
 oShell.Run ("https://www.google.com/search?q=yeah")

 Dim oShell As Object
 stringit = "yeah"
 Set oShell = CreateObject("Wscript.Shell")
 oShell.Run "(" & Chr(34) & "https://www.google.com/search?q=" & stringit & Chr(34) & ")"

 

[jmacleary]

Try:

 oShell.Run (Chr(34) & "https://www.google.com/search?q=" & stringit & Chr(34))

 

[FormR]

Even this would probably suffice.

 oShell.Run "https://www.google.com/search?q=" & stringit

 

[most]

Ahh, so simple! So annoying when you just over complicate it.
Both works of course. THANKS!