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

و ما هو المانع أخي الكريم من كتابة الكود الخاص لكل TabPage على حدة .. أكيد سيكون الكل .. 8 أو 10 سطور .. لا أظنها متعبة

و مع ذلك أخي الكريم .. و جدت لك هذا الكود و الذي يقوم بمسح محتويات Tabcontrol دفعة واحدة بكل ( طابْ باجاتِها )

كود :

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       ClearTabControl(TabControl1)
   End Sub
   Private Sub ClearTabControl(ByVal tb As TabControl)
       For Each page As TabPage In TabControl1.TabPages
           ClearFields(page)
       Next
   End Sub
   Private Sub ClearFields(ByVal cntr As Control)
       For Each ctl As Control In cntr.Controls
           If TypeOf ctl Is TextBox OrElse TypeOf ctl Is ComboBox Then
               ctl.Text = ""
           ElseIf ctl.HasChildren Then
               ClearFields(ctl)
           End If
       Next
   End Sub

تحياتي