Sub Process_Globals
End Sub
Sub Globals
Dim Button1 As Button
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout1")
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub
Sub Button1_Click
Msgbox("Hello, Basic4Android!", "Welcome")
End Sub