...
Dim AndroidResources1 As AndroidResources
Dim Icon1 As Bitmap
Dim MyDrawable1 As BitmapDrawable
MyDrawable1=AndroidResources1.GetApplicationDrawable("myicon")
Icon1=MyDrawable1.Bitmap
Dim BitmapDescriptor1 As BitmapDescriptor
Dim BitmapDescriptorFactory1 As BitmapDescriptorFactory
BitmapDescriptor1=BitmapDescriptorFactory1.FromBitmap(Icon1)
Dim MarkerOptions1 As MarkerOptions
MarkerOptions1.Initialize
MarkerOptions1.Position2(lat,lon).Snippet("").Title("will see if it works...").Visible(True)
MarkerOptions1.Icon(BitmapDescriptor1)
MarkerOptions1.Anchor(0.5,0.5)
Dim Marker1 As Marker=GoogleMapsExtras1.AddMarker(GoogleMap1, MarkerOptions1)
...