So here is my solution...
Dim ds As New DataSet()
Dim url As String = "http://maps.google.com/maps/api/geocode/xml?address=" + txtZip.Text + "&sensor=false"
Dim request As System.Net.WebRequest = System.Net.WebRequest.Create(url)
Using response As System.Net.WebResponse = DirectCast(request.GetResponse(), System.Net.HttpWebResponse)
Using reader As New System.IO.StreamReader(response.GetResponseStream(), Encoding.UTF8)
ds.ReadXml(reader)
Dim dt As DataTable = ds.Tables("result")
Dim strspliaddress = dt.Rows(0)("formatted_Address").ToString().Split(",")
txtcity.Text = strspliaddress(0)
txtState.Text= strspliaddress(1)