窗体上有一个名称为Combol的组合框，要求在其编辑区输入文本并按回车键后，编辑区中的文本被添加到列表中。下面能实现这一功能的是( )。

A．Private Sub Comlbol—KeyDown(KeyCode As Integer，Shift As Integer)IfKeyCode=13 ThenComb01．Addltem Comb01．TextErldⅡEnd Sub

B．Private Sub Combol—KeyDown(KeyCode As Integer，Shift As Integer)IfKeyCode=13 ThenComb01．Addhem Textl．Text，EIldIfEnd Sub

C．Private Sub Combol—Click( )Comb01．Addltem Comb01．Text·End Sub

D．Private Sub Combol—Click( )Comb01．Addhem Textl．TextEnd Sub

查看答案及解析进入在线模考

参考答案

答案解析

在组合框中的输入的文本保存在它的Text属性中，根据程序要求，只要判断按下了回车键后，使用组合框的Addhem方法把Text中的字符添加到列表中即可。选项C和D没有判断是否按下回车键，所以排除。而选项B中使用Addhem方法添加的是Textl．Text的值，不是组合框Com—bol的Text值，所以也不对。

你可能感兴趣的试题

1 工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是：
Public x As IntegerPrivate Y As Integer窗体文件的程序代码是：
Dim a As Integer
Private Sub Form_Load(   )Dim b As Integer
a=2：b=3：x=10v=20
End Sllb
Private Sub Commandl_Click(   )
a=a+5：b=b+5：x=x+5：y=Y+5Print a；b；x；Y
End Sub
运行程序，单击窗体上的命令按钮，则在窗体上显示的是(   )。

A．5 5 15 5

B．7 5 15 25

C．7 8 15 5

D．7 5 15 5

查看解析在线模考

2 窗体上的三个命令按钮构成名称为Commandl的控件数组。如图所示。

程序如下：
Private Sub Commandl—Click(Index As Integer)
IfIndex=1 Then
Print”计算机等级考试”
End If
IfIndex=2 Then
Prim Commandl(2)．Caption
End IfEnd Sub
运行程序，单击“命令按钮2”，则如下叙述中正确的是( )。

A．Print Commandl(2)．Caption语句有错

B．在窗体上显示“命令按钮2”

C．在窗体上显示“命令按钮3”

D．在窗体上显示“计算机等级考试”

查看解析在线模考

3 下面程序的执行结果是( )。
Private Sub Commandl—Click( )a=0
k=1Do While k<4
X=k+kk=k+1
Prim X；
LoopEnd Sub

A．1 4 27

B．1 1 1

C．1 4 9

D．0 0 0

查看解析在线模考