تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[split] حذف النص عندي ما يقارب 80 تكست بكس
#1
أعتذر لصاحب الأعلان
عندي أستفسار داخل التكست بكس
إذا ضغطت أنتر يقوم بحذف النص عندي ما يقارب 80 تكست بكس كيف أحل المشكله بطريقه ميسره وشكراً

أكرر أعتذاري
الرد }}}}
تم الشكر بواسطة:
#2
(02-11-15, 01:27 AM)أبو فيصل كتب : أعتذر لصاحب الأعلان
عندي أستفسار داخل التكست بكس
إذا ضغطت أنتر يقوم بحذف النص عندي ما يقارب 80 تكست بكس كيف أحل المشكله بطريقه ميسره وشكراً

أكرر أعتذاري

قم بعمل موضوع عشان نقدر نتناقش في استفسارك
لحمد لله رب العالمين على كل شي
الرد }}}}
تم الشكر بواسطة:
#3
(02-11-15, 01:27 AM)أبو فيصل كتب : أعتذر لصاحب الأعلان
عندي أستفسار داخل التكست بكس
إذا ضغطت أنتر يقوم بحذف النص عندي ما يقارب 80 تكست بكس كيف أحل المشكله بطريقه ميسره وشكراً

أكرر أعتذاري


كود :
  For Each txt As Control In Me.Controls
            If TypeOf txt Is TextBox Then
                txt.Text = String.Empty
            End If
        Next
الرد }}}}
تم الشكر بواسطة:
#4
خذ راحتك وسبحان الله أحتاج الكود
الرد }}}}
تم الشكر بواسطة:
#5
لو التكست بوكس كلها موجودة داخل الفورم مباشرة هنا تستطيع أن تستخدم الكود الذي تفضل الاخ حريف برمجة بكتابته

لكن لو كانت بعض من التكست بوكس موجودة داخل الفورم و البعض الأخر موجود داخل Panel او داخل GruoupBox عليك أن تضيف الكود التالي الي الفورم لتجد جميع التكست بوكس الموجودة علي الفورم او علي اي كونترول اخر داخل الفورم



كود :
  ' This Method will detect contols only and components will not detected
  Friend Shared Sub FindControls(ctrlContainer As Control, controls As HashSet(Of Control))
      If ctrlContainer Is Nothing Then
          Return
      End If
      For Each ctrl As Control In ctrlContainer.Controls
          controls.Add(ctrl)
          ' If the control has hildren, recursively call this Method
          If ctrl.HasChildren Then
              FindControls(ctrl, controls)
          End If
      Next
  End Sub

  ' This Function will return contols only and components will not be returned
  Friend Shared Function GetControls(list As ICollection, ctrlContainer As Control) As HashSet(Of Control)
      If list Is Nothing OrElse ctrlContainer Is Nothing Then
          Return Nothing
      End If
      Dim controls As HashSet(Of Control) = New HashSet(Of Control)()
      For Each ctrl As Control In list
          controls.Add(ctrl)
          FindControls(ctrlContainer, controls)
      Next
      Return controls
  End Function


و لحذف جميع التكست من حميع التكست بوكس يمكنك أن تستخدم الكود التالي


كود :
    For Each ctrl As Control In GetControls(Me.Controls)
          If TypeOf ctrl Is TextBox Then
              ctrl.Text = ""
          End If
      Next
الرد }}}}
تم الشكر بواسطة:
#6
وضعت كود حريف 
 دبـل كليك على التسكست ثم وضعت الكود 

النتيجه = لا يكتب شـي 

أتمنى أنكم توضحون أين نضع هذه الأكواد أول مره نتعامل معاها 

مشـكورين حفظكم الله
الرد }}}}
تم الشكر بواسطة:
#7
أبو فيصل
النسخ واللصق دون فهم الكود راح يتسبب في ظهور مشاكل
بداية عندما تقوم بدبل كلك على التكست راح يفتح لك محرر الكود على حدث
تغير النص في التكست بوكس
يعني اي حرف اي نقطة تضيفها للتكست راح تتمسح بشكل تلقائي بما انك اضف الكود ا‘لاه
يلزمك تختار حديث آخر وتعمل كوندشن اذا توفر تقوم بمسح كل النصوص من جميع التكستات
بالتوفيق
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة:
#8
ممتاز يابو عمر 

تفضل أشرح لنا الطريقه
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] حفظ النص المكتوب داخل listBox فارس جراح 7 105 15-11-16, 04:00 AM
آخر رد: LoveVb
  نقل قيمة من تكست بوكس الي تكست بوكس فى نموذج اخر السيد الجوهري 4 104 05-11-16, 07:39 PM
آخر رد: shwehdi4pc
  تكست بوكس اذا بها جمل اظهر رسالة هاوي1995 8 124 24-10-16, 04:46 PM
آخر رد: هاوي1995
  [VB.NET] مشكلة فى Dim g As Graphics رسم نص وصور من اداة ريتش تكست بوكس الماجيك مسعد 24 574 24-10-16, 08:06 AM
آخر رد: الماجيك مسعد
Lightbulb عندي مشكلة عند تشغيل البرنامج معمول على لغة Microsoft Visual Studio 10 رمضان محمد 4 145 18-09-16, 02:17 AM
آخر رد: أبو عمر
  دالة لجعل مربع النص لا يقبل حروف atefkhalf2004 6 136 17-09-16, 12:38 AM
آخر رد: أبو عمر
  [سؤال] النص في اداة RichTextBox soper 3 127 06-09-16, 05:49 PM
آخر رد: soper
  [سؤال] وضع رابط الرفع داخل تكست بوكس ابو روضة 0 86 25-08-16, 10:51 PM
آخر رد: ابو روضة
  نقل البيانات من تكست بوكس الى تكست بوكس اخر جميل علي 7 253 25-08-16, 06:56 PM
آخر رد: جميل علي
  خاصية توزيع النص داخل التكست بوكس hglogtd 10 272 08-08-16, 09:04 AM
آخر رد: hglogtd

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم