单选题
窗体上有一个名称为Combo1的组合框。在组合框的文本输入区输入字符串并按回车后,检查该字符串是否在组合框中已存在。若不存在,则将其添加到组合框中。相关的事件过程如下:Private Sub Combo1_KeyPress(KeyAscii As Integer) Dim flag As Boolean If KeyAscii = 13 Then flag = False For i = 0 To Combo1.ListCount - 1 If Combo1.Text = Combo1.List(i) Then flag = True Exit For End If Next i If flag = False Then Combo1.AddItem Combo1.Text End If End IfEnd Sub对于上述事件过程,以下叙述中错误的是
【正确答案】
A
【答案解析】解析:判断是否回车,可通过判断当前按键ASCII码是否为13, C选项表述正确。通过For循环,利用 If Combo1.Text = Combo1.List(i)语句,依次将输入的文本与组合框中的选项逐一比较,若输入文本和其中一个选项相同,那么flag赋值为True,表明该字符串在组合框中已存在。如果For循环完毕,flag仍为False,意味着字符串在组合框中不存在,则通过Combo1.AddItem Combo1.Text语句将其添加到组合框中。这个程序中,For循环是必要的,A选项表述错误,B,D选项表述正确。