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

نسخة كاملة : [تم الحل] كيف يمكن حذف السطر الاول كل مره
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
مرحبا  Heart
عندي مشروع و احد مهماته حذف السطر الاول من التيكست بوكس كل مره يكون فيها عدد الاسطر بالمجمل 16
كيف ممكن كتابة الكود الخاص  Heart  
هذا الكود يحذف ما قبل اخر 16 سطر من اسطر TextBox

With TextBox1
    If .Lines.Count > 16 Then
        .Text = .Text.Substring(.Text.IndexOf(vbCrLf) + Len(vbCrLf))
        .SelectionStart = .Text.Length
    End If
End With

نسيت ان اذكر ان تضع الكود في الحدث TextChenged لمربع النص
السلام عليكم ورحمة الله وبركاته
ما شاء الله اخي بدري سبقني ووضع الكود الذي يحدف السطر قبل الاخير
وانا بدوري قمت بانشاء مثال يمكن للمستخدم تحديد عدد الاسطر التي يريدها في مربع النص
وعند الكتابة اتوماتيكيا سوف يحذف السطر الاول ويتابع الكتابة وهكذا

يجب اولا وضع قيمة اكبر من 1 في numericupdown 
واثناء الكتابة يجب ضغط مفتاح انتر ليتكون  سطر جديد
الاخ بدري اشكرك من كل قلبي تستاهل ان ترفع رتبتبك بالمنتدى 

والاخ ابراهيم ما قصرتوا جزاكم الله خير  Heart