'Let's list available factory sources
Dim tsf As OSMDroid_TileSourceFactory
Dim abc() As OSMDroid_TileSource = tsf.GetTileSources
Log(abc.Length)
For i = 0 To abc.Length-1
Log(abc(i).Name)
Next
'Let's try Mapnik
Dim tsource As OSMDroid_TileSource = tsf.GetTileSource("Mapnik")
MapView1.SetTileSource(tsource)