Dim Button1 As Button
Dim Panel1 As Panel
Sub Activity_Create(FirstTime As Boolean)
Panel1.Initialize("")
Activity.AddView(Panel1, 0, 0, 100%x ,100%y)
Button1.Initialize("Button1")
Button1.Text = "OK"
Panel1.AddView(Button1, 0, 0, 100, 100)
Button1_Click
End Sub
Sub Button1_Click
Msgbox("Button1 Clicked","")
End Sub