arsalansalar
یک شنبه 08 اردیبهشت 1387, 14:32 عصر
با سلام
من برای split کردن یک متن از کد زیر استفاده می کنم.
Dim s AsString = TextBox1.Text
Dim arr() AsString = Split(s, "*")
For i AsInteger = 0 To UBound(arr)
t11.Text = arr(i)
Next
اما مشکلی که دارم این است. فرض کنید اطلاعاتی به شکل زیر وارد کنیم:
a
*
b
این کد حرف b را بر می گرداند.برای اینکه فقط حرف a برگردد چه تغییری باید در آن دهیم؟
من برای split کردن یک متن از کد زیر استفاده می کنم.
Dim s AsString = TextBox1.Text
Dim arr() AsString = Split(s, "*")
For i AsInteger = 0 To UBound(arr)
t11.Text = arr(i)
Next
اما مشکلی که دارم این است. فرض کنید اطلاعاتی به شکل زیر وارد کنیم:
a
*
b
این کد حرف b را بر می گرداند.برای اینکه فقط حرف a برگردد چه تغییری باید در آن دهیم؟