ติดปัญหาโค้ด vb.net ครับ

ผมเอาโค้ดเก่าของพี่ที่เขาเขียนมาพัฒนาต่อ คือตอนแรก มีแค่ Checkbox อยู่ ใน กลุ่ม Groupbox แต่พอเพิ่ม Text box ลงไปแล้วมันขึ้นError


Private Sub Enable_CheckBoxSec23345ABC()
        Dim enumerator As IEnumerator = Nothing
        Try
            enumerator = Me.GroupBox.Controls.GetEnumerator
            Do While enumerator.MoveNext
                Dim current As CheckBox = DirectCast(enumerator.Current, CheckBox) <<<< Error บรรทัดนี้
                If TypeOf current Is CheckBox Then
                    current.Checked = False
                    current.Enabled = False
                End If
            Loop
        Finally
            If TypeOf enumerator Is IDisposable Then
                TryCast(enumerator, IDisposable).Dispose()
            End If
        End Try
        Me.CheckBox1.Enabled = True
        Me.CheckBox2.Enabled = True
        Me.CheckBox3.Enabled = True
        Me.CheckBox4.Enabled = True
        Me.CheckBox5.Enabled = True
        Me.CheckBox6.Enabled = True
        Me.CheckBox7.Enabled = True
        Me.CheckBox8.Enabled = True
        Me.CheckBox9.Enabled = True
        Me.CheckBox10.Enabled = True
  end sub

มัน ขึ้น Error ว่า Unable to cast object of type 'System.Windows.Forms.TextBox' to type 'System.Windows.Forms.CheckBox'. อ่ะครับ
ควรจะแก้ไขยังไงดีครับ