Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As _
  System.EventArgs)
 
if combobox1.selectedtext = "" then
   if combobox1.items.count > combobox1.selectedindex -1 then
      combobox1.selectedindex +=1
      end if
   end if
 
end sub

Gru? eclere