Try this:
Dim text As string = "The following procedure describes the steps used to send data to a server. This procedure is commonly used to post data to a Web page."
Dim result As String = ""
Dim myrequest As HttpWebRequest = HttpWebRequest.Create("http://www.gizoogle.net/textilizer.php")
myrequest.Method = "POST"
myrequest.Timeout = 1000
myrequest.ContentType = "application/x-www-form-urlencoded"
Dim bytedata As byte() = Encoding.UTF8.GetBytes("translatetext="& text &"translate=Tranzizzle+Dis+Shiznit")
myrequest.ContentLength = bytedata.Length
Dim requestStream As Stream = myrequest.GetRequestStream()
requestStream.Write(bytedata, 0, bytedata.Length)
requestStream.Close()
Try
Dim resp As System.Net.HttpWebResponse = myrequest.GetResponse()
Dim sr As New System.IO.StreamReader(resp.GetResponseStream())
result = sr.ReadToEnd()
sr.Close()
Dim re As RegEx = new RegEx("<textarea.*?name=""translatetext"".*?>(.*?)</textarea>")
Dim m As Match = re.Match(result)
If m.Success
result = m.groups(1).Value
End If
Console.WriteLine(result)
Catch ex As WebException
If ex.Status = WebExceptionStatus.Timeout Then
result = "Error: The request has timed out"
Else
result = "Error: " + ex.Message
End If
End Try