PDA

View Full Version : سوال: جدا کردن چند کاراکتر در تکست باکس



morika
جمعه 30 اردیبهشت 1390, 13:02 عصر
سلام
راستش من حدود 30 دقیقه جستجو کردم ولی چیزی در باره این سوال پیدا نکردم شایدم اشتباه جستجو کردم
اگه تکراری معذرت می خوام
می خواستم ببینم چجوری میشه توی تکست باکس کارکترهارو مثلا 5تا 5تا دسته بندی کرد و ریخت توی متغیر
مثلا یه تکست باکس دارم که 25تا کاراکتر توش هست حالا می خوایم این 25تا کاراکتر به صورت دسته های 5تایی بره تویه متغیر بعد پروسه مورد نظر روش انجام شه بعد دوباره 5تا کاراکتر بعدی بره تو تا اینکه همه کاراکترها تموم شه.
خیلی ممنون

alimanam
جمعه 30 اردیبهشت 1390, 14:57 عصر
با سلام

دوست عزیز شما با این تجربه ازتون بعیده که !!! یعنی تا حالا با Substring کار نکرده بودین ؟

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ListBox1.Items.Clear()
Dim str As String = TextBox1.Text
Dim arr(4) As String
Static k As Integer = 0
For i As Int16 = 0 To 4
arr(i) = str.Substring(k, 5)
ListBox1.Items.Add(arr(i))
k += 5
Next
End Sub

موفق باشید ./

morika
جمعه 30 اردیبهشت 1390, 15:04 عصر
راستش من قبل از اینکه جواب شمارو بخونم خودم این کد رو نوشتم که جواب داد
Dim temp As String

For i = 0 To txtcode.TextLength - 1

For j = i To i + 4
temp += txtcode.Text(j)
Next
Next
خیلی ممنون علی آقا ولی من اولش با substring نوشته بودم و error میداد. فکر کردم چون کاراکترهای من سیمبل هستن بخاطر اونه.