[عبد العزيز البسكري]

السّلام عليكم و رحمة الله و بركاته

أخي الكريم .. إضافة لما قدمه الأخويْن الغاليين العزيزين : " إبراهيم إيبو " و " عاصم "

بارك الله فيهما و لهما و جزاهما خير الجزاء إن شاء الله

أنت أخي الغالي .. لم توضّح من البداية أن الأمر يتعلق ب TabControl

لا حظ لو سمحت الأكواد و ما بداخلها من كتابة .. تاكسات بكس أو كومبوبكسات أو أدوات أخرى

مثلا مسح محتويات ال GroupBox

كود :

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       For I = 0 To GroupBox1.Controls.Count - 1
           If TypeOf GroupBox1.Controls(I) Is TextBox Then GroupBox1.Controls(I).Text = ""
       Next
       For I = 0 To GroupBox2.Controls.Count - 1
           If TypeOf GroupBox2.Controls(I) Is TextBox Then GroupBox2.Controls(I).Text = ""
       Next
   End Sub

[b]مثلا مسح محتوياتال TabControl[/b]

كود :

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

       For I = 0 To TabPage1.Controls.Count - 1
           If TypeOf TabPage1.Controls(I) Is TextBox Then TabPage1.Controls(I).Text = ""
       Next

       For I = 0 To TabPage2.Controls.Count - 1
           If TypeOf TabPage2.Controls(I) Is TextBox Then TabPage2.Controls(I).Text = ""
       Next

   End Sub

تحياتي