ايران ويج

با سلام
من یک متن چند خطی داشتم تو یک متغیر , می خواستم به اطلاعاتی از قبیل تعداد خط و متن هر خط و کلمه ای را که دنبالشم , بفهمم در خط چندم است را بدست بیارم .
از چه کد هایی باید استفاده کنم ؟
با تشکر

دوست عزیز بیشتر توضیح بده شفاف سازی کن

خب با استفاده از کاراکتر های 10 و 13 که برای Enter هستن کار کن.

سلام دوست عزیز این تابع تعداد خط ها رو میشماره

کد: 
Private Function LineCount(rText As String) As Long

    Dim Start As Long, Num As Long

    Do

        Start = InStr(Start + 1, rText, vbNewLine)

        Num = Num + 1

        Print Start

    Loop While Start

    LineCount = Num

End Function

mehrad-a

toopdanlod

ajlajlajl

toopdanlod