（23）窗体上有一个命令按钮Command1和一个列表框List1.先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Commandl_Click() Dim In As Integer In___________ List.Remove Ind End Sub 则在程序的空白行的语句是 A.List1.Index B.List1.ListIndex C.List1.Text D.List1.ListCount

题目

（23）窗体上有一个命令按钮Command1和一个列表框List1.先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Commandl_Click() Dim In As Integer In___________ List.Remove Ind End Sub 则在程序的空白行的语句是 A.List1.Index B.List1.ListIndex C.List1.Text D.List1.ListCount

相似考题

1.窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下：Private Sub Command1_Click()Dim In As IntegerIn=______List.Remove IndEnd Sub则在程序的空白行的语句是( )。A．List1.IndexB．List1.ListIndexC．List1.TextD．List1.ListCount

2.在窗体上有一个名称为Command1的命令按钮，并有如下程序：程序执行时，单击命令按钮Command1三次后，窗体上显示的结果为（ ）。A. 5 16B. 5 6C. 15 15D. 15 6

3.在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：Private Sub Command1_CliekDim b, kFor k = 1 to 6b=23+kNext kMsgBox b + kEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是【 】。

4.在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。

参考答案和解析
正确答案：B
【解析】Index属性返回或设置唯一的标识控件数组中一个控件的编号；ListIndex属性返回或设置控件中当前选择项目的索引；ListCount属性返回列表控件中项目的个数；Text属性返回列表框中选择的项目，是string类型，这里需要一个数值类型，所以使用ListIndex。
更多“(23)窗体上有一个命令按钮Command1和一个列表框List1.先选择列表框中的某一个项目,然后单击命令 ”相关问题

  • 第1题：

    在窗体上画一个列表框、一个命令按钮和一个标签，其名称分别为Listl、Commandl和 Labell，通过属性窗口把列表框中的项目设置为：“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数，运行情况如下图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序，请填空。

    Private Sub Commandl Click()

    If Listl.ListIndex＞=______Then

    Listl.RemoveItem ______

    Labell.Caption=______

    Else

    MsgBox “请选择要删除的项目”

    End If

    End Sub


    正确答案：0 Listl.ListIndex Listl.ListCount
    0, Listl.ListIndex, Listl.ListCount 解析：本题考查列表框的属性，这也是历年考试热点。ListIndex属性用来确定已被选中表项的位置，如果表项没有被选中，其值为-1，故本处填0。表示当某表项被选中。 由于ListIndex属性用来确定已被选中表项的位置，故第10空应填Listl.ListIndex。RemoveItem方法表示移除某个表项，Listl.ListIndex一个被选中的表项，符合题意。ListCount是列表框扣个很重要的属性，它返回列表框中表项的数量。本处填Listl.ListCount，并将其值赋给Label1的Caption属性。符合题意。

  • 第2题：

    窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序： Private Sub Command1_Click() Dim i，s For i=0 To List1．ListCount s=s+List1．List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是

    A．0

    B．10

    C．01234

    D．程序出错


    正确答案：C
    解析：ListCount属性返回控件列表部分项目的个数。要对列表框中的每个项目都能进行处理，必须要用到List(Index)属性，而该属性的下标值是从0开始的。变量s为变体型变量，List属性内的内容是字符型的，所以加号(+)起到了连接作用。上述程序运行的结果只是将列表框中的内容连接起来。选项C是正确的。

  • 第3题：

    窗体上有一个名称为Command1的命令按钮，一个名称为List1的列表框。命令按钮的单击事件过程如下： Private Sub Command1_Click（) Open "c:f1.txt" For Input As #1 Do While Not EOF（1) Input #1, str1 List1.AddItem str1 Loop Close End Sub 对于上述程序，以下叙述中错误的是________。

    A．Close的作用是关闭已经打开的数据文件

    B．单击命令按钮后，把f1.txt中的所有内容添加到列表框中

    C．以输入方式打开随机文件f1.txt

    D．运行程序后，列表框中的列表项都是f1.txt中的记录


    C C。【解析】本题考y,-add方法里IsMissing的v3，v3是一个可选项，用来判断这个参数是否存在。根据程序语句，当输入3个参数时，就是3个参数求和，输入2个参数时是两个数求和，题目中是2个参数，因此是2个参数求和，不会报错。

  • 第4题：

    窗体上有一个命令按钮Commalld1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Command1_Click() Dim In As Integer In=______ List.Removc Ind End Sub 则在程序的空白行的语句是( )。

    A．List1.Index

    B．List1.ListIndex

    C．List1.Text

    D．List1.ListCount


    正确答案：B
    解析：Index属性返回或设置惟一的标识控件数组中一个控件的编号；ListIndex属性返回或设置控件中当前选择项目的索引；ListCount属性返回列表控件中项目的个数；Text属性返回列表框中选择的项目，是string类型，这里需要一个数值类型，所以使用ListIndex。

  • 第5题：

    （ 15 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：

    Private Sub Command1_Click （）

    Dim b,k

    For k=1 to 6

    b=23+k

    Next k

    MsgBox b+k

    End Sub

    打开窗体后，单击命令按钮，消息框的输出结果是 【 15 】 。


    正确答案：

相关内容