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

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

admin2020-02-27  61
问题 在窗体上画三个名称分别为Text1、List1和Command1的文本框、列表框和命令按钮，且List1中有若干列表项，Text1的内容为空，然后编写如下事件过程：
    Private Sub Command1_Click()
    Dim i As Integer
    If Text1．Text=""Then
    Exit Sub
    End If
    If List1．ListIndex<>一1 Then
    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/zkTp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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