[سوال] چگونگي استفاده از توابع رشته اي در تكست باكس با حالت multiline

[PRO]

سلام دوستان .
فرض كنيد من يه textbox به نام Textbox1دارم كه حالت Multiline آن را فعال يا True كرده ام.حالا دو سوال دارم:
1-چطور مي‌توانم خط n ام (يعني هر خطي را كه بخواهم) را از اين تكست باكس پاك كنم؟
2-چطور مي‌توانم اولين كاراكتر خط n ام (يعني هر خطي كه بخواهم) را بخوانم؟
با تشكر

[babyy]

با کلک رشتی :)

هر خط با یک اینتر جدا شده ؛
پس اگه کل متن textbox رو بگیری و اونو split کنی از کاراکتر اینتر ( که توی ویبی با ثابت vbnewline هست) یک آرایه داری که شماره خطی که میخوای رو منهای یک کنی میشه اندیس اون خونه :)

http://forums.devshed.com/visual-basic-p...22408.html


اولین کاراکتر اون خط هم با mid

http://forums.devshed.com/visual-basic-p...99471.html

[PRO]

خيلي ممنون
يه سوال فانكشن split كارش چيه؟

---

يه سوال ديگه:
اين كارو كردم.ولي حالا كه مي‌خوام مثلا خط اول رو پاك كنم بايد از اين كد استفاده كنم:

کد php:

str1 = Split(Text1.Text, vbNewLine
 text1.Text =Replace(text1.Text ,str1(0),"") 


ولي شايد خط ها شبيه هم باشه مثلا خط اول و سوم كه در اون صورت خط سوم هم پاك ميشه

[babyy]

split متن رو تیکه تیکه میکنه
مثلا متن 1A2A3A4A5 ؛ اگه روی split رو برای این متن برای A انجام بدی خروجیش یک آرایه میشه که توی خونه صفرم 1میشه و اول 2 و ....


خب منم نگفتم replace کن !
یه حلقه بزن و آرایه رو یکی یکی توی textbox بریز (بجز اون خطی که میخوایی پاک بشه)
مثلا:

کد php:

for i = 0 to UBound(array)
    textbox1.text =textbox1.text & array(i) & vbnewline
next i 


توضیحات :
۱ - UBound آخرین خونه ی آرایه رپ بر میگردونه
۲ - کد رو الا نوشتم شاید ایراد داشته باشه ؛ مهم مفهومشه

[PRO]

تشكر از شما
براي خواندن اولين كاراكتر خط آخر هم اين كد را نوشتم كه كار كرد

کد php:

str2 = Left(str1(UBound(str1)), 1)

Print str2