Sub Process_Globals
Private MainForm As Form
Private Label1 As Label
End Sub
Sub Globals
Private Label1 As Label
End Sub
Sub Activity_Create(FirstTime As Boolean)
MainForm = Form1
MainForm.RootPane.LoadLayout("Dyno_Layout") 'Load the layout file
MainForm.Show
End Sub
Sub Button2_Click
Label1.Text = 2
End Sub
Sub Button1_Click
Label1.Text = 1
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub