Sub Globals
Dim Canvas1 As Canvas
End Sub
Sub Activity_Create(FirstTime As Boolean)
'Activity.LoadLayout(...)
Canvas1.Initialize(Activity)
Canvas1.DrawText("This is some text", 100dip, 100dip, Typeface.DEFAULT, 14, Colors.White, "LEFT")
Activity.Invalidate 'refresh the activity
End Sub