2. 计算机
  3. 在窗体上画三个名称分别为Text1、List1和Command1的文本框、列表框和命令按钮，且List1中有若干列表项，Text1的内容为空，然后编写如下事件过程： Private Sub Comnmnd1_Click() Dim i As Integer

在窗体上画三个名称分别为Text1、List1和Command1的文本框、列表框和命令按钮，且List1中有若干列表项，Text1的内容为空，然后编写如下事件过程： Private Sub Comnmnd1_Click() Dim i As Integer

admin2018-06-20  29
问题 在窗体上画三个名称分别为Text1、List1和Command1的文本框、列表框和命令按钮，且List1中有若干列表项，Text1的内容为空，然后编写如下事件过程：
Private Sub Comnmnd1_Click()
Dim i As Integer
If Text1．Text=" "Then
Exit Sub
End If
If List1．Listlndex＜＞-1Then
List1．List(List1．ListIndex)=Text1．Text
Else
List1．AddItem Text1．Text
End If
Text1．Text=" "
End Sub
以下叙述中正确的是(    )。
选项 A、程序的功能是从List1中删除一个列表项
B、程序的功能是把List1中选中的列表项内容显示在Text1中
C、程序的功能是将Text1中的文本添加到List1中选中的列表项之后
D、程序运行时，如果Text1中没有输入任何文本，则单击Command1时程序不进行其他操作
答案D
解析 程序运行前Text1文本框中的内容为空，当Command1_Click事件过程执行时，if语句判断Text1为空，条件成立，执行语句Exit Sub，过程被提前结束，后续语句将不会被执行，所以本题D选项叙述正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/0iGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)