Sub DrawFont(MyText As String) As Bitmap
Dim MyFont As Typeface
MyFont = Typeface.LoadFromAssets("myfont.ttf")
Dim Canvas As Canvas
Dim imgCC As Bitmap
imgCC.InitializeMutable(40dip,16dip) 'sample size
Canvas.Initialize2(imgCC)
Canvas.DrawText(MyText, 0, 0, MyFont, 16, Colors.Blue, "LEFT")
Return Canvas.Bitmap
End Sub