[Amin_Mansouri]

نمیشه از برنامه خارج میشه؟
Sub cmdtext_Click
If txtpassword.Text="123" Then
Msgbox("succes","ok")
Else
ibiprompt.Text="wrog pass try again"
txtpassword.Text=""
activity.Finish
activity.LoadLayout("password1")
End If
End Sub

نویسنده کد امین منصوری

توضیحات ساخت پنجره خروج از برنامه به صورت سوالی

کد:

Dim close As Int
close = Msgbox2("ایا شما میخواهید از برنامه خارج شوید؟", "پارس کاو 1.2", "بله", "", "خیر",Null)
If close = "-1" Then
Activity.Finish    
Else
End If