怎么回事？关于CASE语句的应用问题

Question

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   if(ComboBox1->Items->IndexOf(ComboBox1->Text)==0)Label1->Caption="ok";
   else Label2->Caption="ko";
}
//---------------------------------------------------------------------------void __fastcall TForm1::FormCreate(TObject *Sender)
{
      ComboBox1->Text=ComboBox1->Items->Strings[0];
}
呵呵，我这样用bcb写一切正常啊

Answer 1

combobox1.text:=combobox1.items[0];这一句并没有选择一项，这时itemindex为-1,当然什么也不执行了。