منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

لدي علي الفورم تيكست بوكس كما هو موضوح علي اليسار
احتاج الكود يجعل السطور عند عمل عمليه كوبي / بيست داخل التكست بوكس تكون سطور بهذا الشكل
(كود new line ) مع احتساب عدد الline في ليبل بطريقه تسلسليه عند الضغط علي البوتن

ضع هذا الكود في زر بوتون

كود :

Dim count As Integer = TextBox1.Text.Split(vbNewLine).Count

        Dim txt As String = TextBox1.Text.Replace(vbNewLine, " new Line ")

        Clipboard.SetText(txt) 'نسخ الى الوندوز

        Label1.Text = count

        MsgBox(txt)

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

اليوم السابع

3booody