درخواست سورس خروج

[nany12 623]

من یک کدی میخوام با بازدنش ازش بپرسه آیا مایل به خروج هستید یا نه ؟ بعدش هم یک گزینه اضافی داشته باشه که پنج ستاره به برنامه باشه.

تو انجمن و... گشتم هر چی کد هست همشون یا نیاز به کتابخونه دارن یا کار نمیکنند

[مجید آرتا 5,874]

کد به این شکله :

      Dim result As Int
   result=Msgbox2("میخوای از برنامه خارج شی؟","","آره","دادن ستاره به برنامه","نه",Null)
   If result=DialogResponse.POSITIVE Then
   Activity.Finish
   ExitApplication
   Else If result=DialogResponse.NEGATIVE Then
   Return True
   Else If result=DialogResponse.CANCEL Then
   Dim i As Intent
   i.Initialize(i.ACTION_EDIT,"bazaar://details?id=PackageName")
   StartActivity(i)
   End If
 End If

[nany12 623]

به کتابخونه ای احتیاج نداره؟

[مجید آرتا 5,874]

نه دوست عزیز

[پژمان نیکروان 6,055]

همین الان پیوست شد :-d

exit.zip

[پژمان نیکروان 6,055]

ببخشید پاسخ آقا مجید رو ندیده بودم که جواب رو داده بودن.*inlove*