Need to take and address and get the lat/lon. I think I’m almost there but keep getting an error at the GeoClt.Search line, “Sequence Contains No Elements”). Here’s the code:
Private Sub Btn_Geocode_Click(sender As Object, e As EventArgs) Handles Btn_Geocode.Click
Dim GeoClt As New GeocodingClient("User","Secret")
Dim GeoOpts As New GeocodingOptions()
GeoOpts.SearchMode = GeocodingSearchMode.FuzzyMatch
Dim result As GeocodingResult
Dim resultLoc As GeocodingLocation
result = GeoClt.Search(Txt_StreetAddress.Text & ", " & Txt_City.Text & ", " & Txt_State.Text & " " & Txt_Zipcode.Text, GeoOpts)
resultLoc = result.Locations.First
MsgBox(result.Locations(0).LocationPoint.X)
End Sub