Sub Main()
Dim request As HttpWebRequest =
HttpWebRequest.Create("http://www.google.com")
Dim response As HttpWebResponse
Dim postData As String = "q" & ChrW(61) & "Sample Criteria"
Dim bytes As Byte() = System.Text.ASCIIEncoding.ASCII.GetBytes(postData)
Dim output As IO.Stream