[2005] Why is this Late Binding?

[Ginolard]

        For Each Item As ManagementBaseObject In Me.WMIWrapper.RunQuery("select * from Win32_SystemEnclosure")

            Select Case Item("ChassisTypes")(0)
                Case 1
                    Me.txt_Type.Text = "Other"
                Case 2
                    Me.txt_Type.Text = "Unknown"
                Case 3
                    Me.txt_Type.Text = "Desktop"
                Case 4
                    Me.txt_Type.Text = "Low-profile desktop"
                Case 5
                    Me.txt_Type.Text = "Pizza box"
                Case 6
                    Me.txt_Type.Text = "Mini tower"
                Case 7
                    Me.txt_Type.Text = "Tower"
                Case 8
                    Me.txt_Type.Text = "Portable"
                Case 9
                    Me.txt_Type.Text = "Laptop"
                Case 10
                    Me.txt_Type.Text = "Notebook"
                Case 11
                    Me.txt_Type.Text = "Hand-held"
                Case 12
                    Me.txt_Type.Text = "Docking station"
                Case 13
                    Me.txt_Type.Text = "All-in-one"
                Case 14
                    Me.txt_Type.Text = "Subnotebook"
                Case 15
                    Me.txt_Type.Text = "Space-saving"
                Case 16
                    Me.txt_Type.Text = "Lunch box"
                Case 17
                    Me.txt_Type.Text = "Main system chassis"
                Case 18
                    Me.txt_Type.Text = "Expansion chassis"
                Case 19
                    Me.txt_Type.Text = "Subchassis"
                Case 20
                    Me.txt_Type.Text = "Bus-expansion chassis"
                Case 21
                    Me.txt_Type.Text = "Peripheral chassis"
                Case 22
                    Me.txt_Type.Text = "Storage chassis"
                Case 23
                    Me.txt_Type.Text = "Rack-mounted chassis"
                Case 24
                    Me.txt_Type.Text = "Sealed-case computer"
            End Select