Private Sub HideInfoWindow (Marker As Marker, Map As GoogleMap)
If MarkerInfos.ContainsKey(Marker) Then
Dim info As JavaObject = MarkerInfos.Get(Marker)
Dim jMap As JavaObject = Map
jMap = jMap.GetField("map")
info.RunMethod("close", Array (jMap, Marker))
End If
End Sub