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

admin2020-02-27  40

问题 在窗体上画三个名称分别为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://jikaoti.com/ti/edx0FFFM
0

最新回复(0)