Sub Globals
Dim EditText1 As EditText
Dim EditText2 As EditText
Dim Speak1 As SpeakButton
Dim Speak2 As SpeakButton
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
Speak1.TargetEditText = EditText1
Speak2.TargetEditText = EditText2
End Sub