Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.Show
MainForm.RootPane.LoadLayout("1") 'Load the layout file.
Dim options As MapOptions
options.StreetViewControl = False
options.MapTypeControl = False
options.OverviewMapControl = False
' gmap.Initialize("gmap", options) 'You should call Initialize2 and set the API key!
gmap.Initialize2("gmap", Null, "AIzaSyXXXXXXXXXXXXXXXXXXXXXXXXXXX")
Pane1.AddNode(gmap.AsPane, 0, 0, Pane1.Width, Pane1.Height)
MarkerInfos.Initialize
End Sub