0
Я хочу отобразить карту google в приложении vb.net, кроме левой боковой панели карты google. Для этого я сделал функцию, называемую map(), которая запрашивает карту api google с широтой и долготой, которые у меня есть. Следующее является кодом функции map(), этот код будет помещен в поле richtext, и браузер должен запустить кода в этом поле richtext. Проблема в том, что код html записывается в поле richtext, но все же веб-браузер не отображает карту, и программа не показывает никаких ошибок, но просто не работает должным образом. Я не знаю, подходит ли мой подход к решению этой проблемы. Есть ли другой способ. Любая помощь будет оценена. Благодарю.google map in vb.net
Public Sub map()
' Dim addr As String
Dim html As String
html = "<!DOCTYPE html>" _
& "<html>" _
& "<head>" _
& "<title>Simple Map</title>" _
& "<meta name='viewport' content='initial-scale=1.0, user-scalable=no'>" _
& "<meta charset='utf-8'>" _
& "<style>" _
& "html, body, #map-canvas {" _
& "height: 100%;" _
& "margin: 0px;" _
& "padding: 0px" _
& "}" _
& "</style>" _
& "<script type='text/javascript' src='https://maps.googleapis.com/maps/api/js? v=3.exp&sensor=false'></script>" _
& "<script>" _
& "var map;" _
& "function initialize() {" _
& "var mapOptions = {" _
& "zoom: 8," _
& "center: new google.maps.LatLng(" & TextBox2.Text & "," & TextBox3.Text & ")" _
& "};" _
& "map = new google.maps.Map(document.getElementById('map-canvas')," _
& "mapOptions);" _
& "}" _
& "google.maps.event.addDomListener(window, 'load', initialize);" _
& "</script>" _
& "</head>" _
& "<body>" _
& "<div id='map-canvas'></div>" _
& "</body>" _
& "</html>" _
RichTextBox1.Text = html
WebBrowser1.Navigate(RichTextBox1.Text)
End Sub
Я не уверен, если это поможет, но это разумно использовать 'parseFloat()' для широты и LNG в 'google.maps.LatLng()', если входные значения поступают в виде строк. –