تقييم الموضوع :
  • 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 5,965 29-05-16, 01:01 AM
آخر رد: CLARO
  كود لجعل أداة النص لا تقبل إلا الأرقام sooriaty03 11 7,668 29-05-16, 12:59 AM
آخر رد: CLARO
  البحث عن اي كلمة في مربع النص RaggiTech 0 2,377 17-10-12, 09:55 PM
آخر رد: RaggiTech
  نسخ مجلد مع جميع محتوياته RaggiTech 0 2,108 17-10-12, 06:49 PM
آخر رد: RaggiTech
  معرفة حجم مجلد مع جميع الملفات و المجلدات التي يحتوي عليها باستعمال ال Recursion RaggiTech 0 2,184 17-10-12, 06:47 PM
آخر رد: RaggiTech
  لحذف جميع العناصر المختارة في ListBox RaggiTech 0 2,045 17-10-12, 06:06 PM
آخر رد: RaggiTech
  لتفريغ حقول ال TextBoxes الموجودة على WinForm RaggiTech 0 1,740 17-10-12, 06:05 PM
آخر رد: RaggiTech
  كيفية عمل Restore Point مع جميع خصائصه باستعمال دوال ال API RaggiTech 0 2,063 17-10-12, 06:00 PM
آخر رد: RaggiTech
  لمعرفة جميع عناوين Ip في الشبكة المحلية RaggiTech 0 1,817 17-10-12, 05:38 PM
آخر رد: RaggiTech
  النسخ و اللصق من النص الي Windows Clipboard RaggiTech 0 1,670 17-10-12, 05:03 PM
آخر رد: RaggiTech

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


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