For each CTL in Controls
     If TypeOf CTL is Combobox then 
         Dim ct as Combobox = Directcast(CTL, Combobox)
          ' Ab hier kannst Du nun über ct. auf alle Methoden und Funktionen der 
          ' Kombobox zugreifen.
     End If
Next