تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لافراغ جميع مربعات النص textboxes
#1
كاتب الموضوع : AhmedEssawy


كود :
Private Sub ClearForm()
Dim obj As Control, objGrp As Control
For Each obj In Form.ActiveForm.Controls
If TypeOf obj Is GroupBox Then
For Each objGrp In obj.Controls
If TypeOf objGrp Is TextBox Then
If objGrp.Name <> "txtCNO" Then objGrp.ResetText()
End If
Next objGrp
End If
Next obj
End Sub
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كود لعمل تحجيم تلقائي -AutoSize- لأداة مربع النص TextBox sooriaty03 7 1,619 29-05-16, 01:01 AM
آخر رد: CLARO
  كود لجعل أداة النص لا تقبل إلا الأرقام sooriaty03 11 1,988 29-05-16, 12:59 AM
آخر رد: CLARO
  البحث عن اي كلمة في مربع النص RaggiTech 0 553 17-10-12, 09:55 PM
آخر رد: RaggiTech
  نسخ مجلد مع جميع محتوياته RaggiTech 0 373 17-10-12, 06:49 PM
آخر رد: RaggiTech
  معرفة حجم مجلد مع جميع الملفات و المجلدات التي يحتوي عليها باستعمال ال Recursion RaggiTech 0 316 17-10-12, 06:47 PM
آخر رد: RaggiTech
  لحذف جميع العناصر المختارة في ListBox RaggiTech 0 333 17-10-12, 06:06 PM
آخر رد: RaggiTech
  لتفريغ حقول ال TextBoxes الموجودة على WinForm RaggiTech 0 447 17-10-12, 06:05 PM
آخر رد: RaggiTech
  كيفية عمل Restore Point مع جميع خصائصه باستعمال دوال ال API RaggiTech 0 372 17-10-12, 06:00 PM
آخر رد: RaggiTech
  لمعرفة جميع عناوين Ip في الشبكة المحلية RaggiTech 0 340 17-10-12, 05:38 PM
آخر رد: RaggiTech
  النسخ و اللصق من النص الي Windows Clipboard RaggiTech 0 260 17-10-12, 05:03 PM
آخر رد: RaggiTech

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


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