[ata2]

این نمونه برنامه ای که میخوام بنویسم.
Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
Dim sale As Button
Dim btexit As Button
Dim Phone As PhoneCalls
Dim hardware As Button
End Sub

Sub hardware_Click
StartActivity(Phone.Call("09356343019"))
End Sub



Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("main")

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub sale_click
Activity.LoadLayout("vf")
Activity.Finish()

End Sub
Sub btexit_click
Activity.Finish()

End Sub

---

قسمت قرمز رنگ همون فرم هایی هست که من میخوام یکی بسته بشه و دیگری باز بمونه اما متاسفانه هر دو فرم تمام نوشته هاش می افته روی همدیگه و قاطی پاتی میشه