当前位置:IT认证>BASIC题库

问题:[问答题]

[问答题] 以下程序运行后的窗体如图所示。其中组合框的名称是Combo1,已有列表框如图所示;命令按钮的名称是Command1。 Private Sub Command 1_Click() If Not Check(Combo1. Text) Then MsgBox("输入错误") Exit Sub End If For k=0 To Combo1. ListCount-1 If Combo1. Text=Combo1.List(k)Then MsgBox("

  

参考答案:

B

  参考解析

本题程序的功能是:向组合框的文本输入区输入一个单词,若其中含有非字母字符则利用消息框输出“输入错误”,若其已经在组合框的列表项中存在则输出“添加项目失败”,否则将其加入到组合框的列表项中并显示“添加项目成功”。

微信端