Sub btnNearest_Click
Dim Lat As Double
Dim Lon As Double
Lat = -26.18586111
Lon = 28.03805556
Dim MarkerText As String = "Provincial Commissioner"
Dim ExtraText As String = "16 Empire Rd. Parktown"
gmap = MapFragment1.GetMap
Dim m1 As Marker = gmap.AddMarker(Lat, Lon, MarkerText) <<---Error Here
Dim CameraPosition1 As CameraPosition
CameraPosition1.Initialize(Lat, Lon, 17)
gmap.AnimateCamera(CameraPosition1)
m1.Snippet = ExtraText
pnlMap.Visible = True
End Sub