Sub Process_Globals
Dim Sms1 As PhoneSms
End Sub
Sub Globals
Dim EditText1 As EditText
Dim Button1 As Button
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout1")
End Sub
Sub Button1_Click
Sms1.Send(EditText1.Text, "This is a test")
End Sub