Sub AppStart (Form1 As Form, Args() As String)
'...
Try
Dim options As MapOptions
options.StreetViewControl = False
gmap.Initialize("gmap", options)
Pane1.AddNode(gmap.AsPane, 0, 0, Pane1.Width, Pane1.Height)
Catch
'...
End Try
End Sub
Sub Pane1_Resize (Width As Double, Height As Double)
Try
gmap.AsPane.SetSize(Width, Height)
Catch
'...
End Try
End Sub