Sub Globals
Dim lab As Label
End Sub
Sub Activity_Create(FirstTime As Boolean)
lab.Initialize("")
Activity.AddView(lab, 0, 0, 800dip, 400dip)
lab.Text = "the quick brown fox"
lab.TextSize = 80
lab.TextColor = Colors.Red
lab.Color = Colors.Green
lab.Typeface = Typeface.DEFAULT
End Sub