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

split کردن متن و تغییر پس از هر بار کلیک


vahid.taj

سوال

سلام دوستان 

میخواستم بدونم چطور میشه مثلا یه تکست باکس که مثلا دارای 50 متن هست و متون با # از هم جدا شدن رو با هر بار کلیک روی باتن توی لیبل نمایش داد ؟

 

1 تکست باکس با متون # جدا شدن

1 باتن

1 لیبل

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

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

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

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

سلام میتونید این کدک رو اضافه کنید و دیگه از i  استفاده نکنید :

Dim random As Int = Rnd(0,Str.Length - 1)
Label1.Text = Str(random)
لینک ارسال
به اشتراک گذاری در سایت های دیگر




Sub Globals


Private Label1 As Label
Private EditText1 As EditText
Dim i = 0
End Sub


Sub Button1_Click
Dim str() As String = Regex.Split("#",EditText1.Text)
Label1.Text = str(i)
If i = str.Length-1 Then
i = 0
Else
i = i + 1
End If
End Sub


سمپل هم پیوست شد

split txt with # and show in label.rar

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

سلام ، ممنون آقای ایزدی

میخوام بطور راندوم متن بگیره

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

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

اگه خودتون این تکه کد رو تست کنید متوجه میشید

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

بایگانی شده

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

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

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