خواندن یک خط از یک متغیر رشته ای چندخطی

[M.T.P]

با سلام::قلب:

چطور میشه یک خط از یه متغیر رشته ای که مقدارش چندخط هست خوند؟
به عنوان مثال فرض کنید یک Textbox دارین با خصوصیت Multiline که 3 خط داخلش تایپ شده و شما مقدار کل داخل Text رو به یه متغیر String نسبت میدین. خب حالا چطور میتونیم خط دوم از این متغیر رو بخونیم؟:گیج:نمیدونم سخته یا راحت:لبخند:

[kooroush]

باید ببینین تو هر خط چند کاراکتر نوشته می شه ! و بعد با کد نویسی بگید مثلا از فلان کاراکتر گرفته بشه !
فکر کنم نمونه اش رو قبلا تو همین سایت دیده بودم !

[skh1300]

به نظر من متغییر را بریز داخل Rich text Box وبعد بگو فلام خط را برام نشان بده

[M.T.P]

باید ببینین تو هر خط چند کاراکتر نوشته می شه ! و بعد با کد نویسی بگید مثلا از فلان کاراکتر گرفته بشه !
فکر کنم نمونه اش رو قبلا تو همین سایت دیده بودم !
تشکر ، خب چطور میشه فهمید تو هر خط چند کارکتر هست؟ اگه به خط دسترسی داشتم که دیگه مشکلی نبود:افسرده:


به نظر من متغییر را بریز داخل Rich text Box وبعد بگو فلام خط را برام نشان بده

تشکر اما راه جالبی نیست.:افسرده:

:متعجب:عـــــــــــجــــــ ـب مـــشـــــــکـــلــــــــ ــــیه هـــــــــــــــا:متعجب:

[xxxxx_xxxxx]

با تابع InStr دنبال کاراکترهای vbCrLf بگردید. خروجی تابع رو بعلاوه 2 کنید میشه نقطه شروع خط بعد. تا جایی که باز به کاراکترهای vbCrLf برسیم. به عبارتی، هر خط بین دو vbCrLf قرار داره.

vbCrLf از ثابتهای پیشفرض vb هست که مجموع کاراکترهای 10 و 13 است.

[vbhamed]

سلام


Dim S$, Temp() As String

S = Text1
Temp = Split(S, vbCrLf)
If UBound(Temp) > 0 Then MsgBox Temp(1) Else MsgBox ""




Temp(0)
خط اول،


Temp(1)

خط دوم


Temp(Ubound(Temp))
خط آخر


UBound(Temp)
تعداد خطوط