Sub Map_Ready
Log("map ready")
gmap = mFragment.GetMap
If gmap.IsInitialized = False Then
ToastMessageShow("Error initializing map.", True)
Else
gmap.AddMarker(53.544133, -2.605544, "Royce's Health & Fitness, 193 Manchester Rd, Ince, WN2 2JA Wigan, 01942 321933")
Dim cp As CameraPosition
cp.Initialize(53.544133, -2.605544, gmap.CameraPosition.Zoom)
gmap.AnimateCamera(cp)
End If
End Sub