رفتن به مطلب
  • 0

درخوسات کد نمایش پیام بعد از خروج از برنامه


rezagh99

سوال

سلام بچه ها خسته نباشید :) 

 

ببخشید عنوان پست رو اشتباه نوشتم :20: 

 

من نیاز به یه کد دارم که وقتی کاربر از برنامه خارج شد نمایش داده بشه

منظورم نمایش پیام برای خروج یا ماندن دربرنامه نیست

میخام وقتی کاربر کامل از برنامه خارج شد این پیام نشون داده بشه و همچنین میخوام که این پیام ها در دفعات مختلف فرق کنه

مثلا بار اول که از برنامه خارج میشه یه پیام و وقتی بار دو ماز برنامه خارج میشه یه پیام دیگه نشون داده بشه

یعنی پیام ها به صورت تصادفی باشه.

اگه چنین کدی دارین بدین

خیلی ممنون :give_heart:  :give_heart: 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

5 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

فکر کنم واسه هر بار یه متن گذاشتن رندومی منظورتونه  و این کد کارتون راه بندازه با اسپلیت # :

Sub Globals
	
	Dim str() As String
	Dim random As Int
	Dim matn As String
	
End Sub
Dim str() As String = Regex.Split("#","matn1#matn2#matn3#matn4#matn5#")
Dim random As Int = Rnd(0,str.Length - 1)
matn = str(random)
ToastMessageShow(matn,False)
لینک ارسال
به اشتراک گذاری در سایت های دیگر

 

فکر کنم واسه هر بار یه متن گذاشتن رندومی منظورتونه  و این کد کارتون راه بندازه با اسپلیت # :

Sub Globals
	
	Dim str() As String
	Dim random As Int
	Dim matn As String
	
End Sub
Dim str() As String = Regex.Split("#","matn1#matn2#matn3#matn4#matn5#")
Dim random As Int = Rnd(0,str.Length - 1)
matn = str(random)
ToastMessageShow(matn,False)

 

ببخشید من تازه کارم

 

چطوری باید یه دکمه رو به این مرنبط کنم؟؟

مرسی

لینک ارسال
به اشتراک گذاری در سایت های دیگر

دوست عزیز کافیه کد رو داخل ساب مربوط به باتن(دکمه) قرار بدید ، به این شکل :

Sub Button1_Click
	
	Dim str() As String = Regex.Split("#","matn1#matn2#matn3#matn4#matn5#")
	Dim random As Int = Rnd(0,str.Length - 1)
	matn = str(random)
	ToastMessageShow(matn,False)

End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

 

دوست عزیز کافیه کد رو داخل ساب مربوط به باتن(دکمه) قرار بدید ، به این شکل :

Sub Button1_Click
	
	Dim str() As String = Regex.Split("#","matn1#matn2#matn3#matn4#matn5#")
	Dim random As Int = Rnd(0,str.Length - 1)
	matn = str(random)
	ToastMessageShow(matn,False)

End Sub

 

خیلی ممنون

 

اگه میتونی یه پروژه آماده بزار

مرسی

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

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

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...