窗体上有一个按钮和一个列表框，执行下列程序后的输出结果为【 】。Private Sub Command1_Click()List1.Addltem"China"List1.Addltem"USA"List1.Addltem"Japan"，1Print List1.List(2)End Sub

题目

窗体上有一个按钮和一个列表框，执行下列程序后的输出结果为【 】。

Private Sub Command1_Click()

List1.Addltem"China"

List1.Addltem"USA"

List1.Addltem"Japan"，1

Print List1.List(2)

End Sub

相似考题

1.（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

2.在窗体上画一个列表框、一个文体框及一个按钮，然后编写如下事件过程： Private Sub Form. Loab() List.AddItem"357" List.AddItem"246" List.AddItem"123" List.AddItem"456" TEXT1.Text="" End Sub Private Sub Command1_Click() List．Listindex=3 Print List.Text1+Text1.Text End Sub 程序运行后，在文本框中输入"789"，然后双击列表框中的"456"，则输出结果为A．789123B．456789C．789456D．1245

3.在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程:Private Sub Form_loab()List.AddItem″357″List.AddItem″246″List.AddItem″123″List.AddItem″456″TEXT1.Text=″″End SubPrivate Sub Command1_Click()List.Listindex=3Print List.Text1+Text1.TextEnd Sub程序运行后,在文本框中输入″789″,然后双列表框中的″456″,则输出结果为A．789123B．456789C．789456D．1245

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

参考答案和解析
正确答案：USA
USA
更多“窗体上有一个按钮和一个列表框,执行下列程序后的输出结果为【】。Private Sub Command1_Click()List ”相关问题

  • 第1题：

    窗体上有一个按钮和一个Sorted属性为True的列表框，执行下列过程后的输出结果（ ）。

    A．i

    B．VB

    C．like

    D．!


    正确答案：C
    Addltem方法的一般格式为：object．AddltemItem，Index。其中，“Item”用来指定添加到该对象的项目；“Index”用来指定新项目或行在该对象中的位置，第一项为0。如果所给出的Index值有效，则Item将放置在object中相应的位置。如果省略Index。当Sorted属性设置为True时，Item将添加到恰当的排序位置，当Sorted属性设置为False时，Item将添加到列表的结尾。本题中执行一系列Addltem操作后，Listl的项目依次是：“i”、“Like”、“VB”、“!”。因为列表框中第一个项目的索引为0而最后一个项目的索引为ListCount-1，所以List(2)取出的是“Like”。

  • 第2题：

    窗体上有一个按钮和一个列表框，执行下列程序后，输出的结果为 Private Sub Command1_Click() List1.AddItem "Visual" List1.AddItem "Basic" List1.AddItem "Programming", 1 Print list1.List(2) End Sub

    A．Visual

    B．Basic

    C．Programming

    D．2


    正确答案：C
    解析：列表框控件使用AddItem方法增加列表项，格式如下：object.AddItemitem[，index]Index参数为可选参数，当不带该参数使用AddItem方法时，增加项自动添加到列表框最后一条；当带Index参数时，则将增加项添加到Index指定的位置。注意Index只能在0到ListCount间取值。本题中由于最后一个AddItem方法使用了Index(为1)，所以“Programming”插入到第2行的位置，“Basic”则被挤进最后一行的位置(对应Index=2)。

  • 第3题：

    窗体上有一个列表框和一个文本框，编写下列两个事件过程：

    Private Sub Form. Load()

    List1.Addltem"北京"

    List1.Addltem"天津"

    List1.Addltem"上海"

    Text1.Text=""

    End Sub

    Private Sub List1 Click()

    Print Text1.Text+List1.Text

    End Sub

    程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是( )。

    A．中国北京

    B．中国天津

    C．中国上海

    D．北京中国


    正确答案：A
    解析：程序运行时，首先在文本框中输入“中国”，则文本框的Text属‘陛值为“中国”；然后单击列表框中的“北京”，则此时列表框的Text属性值为“北京”；最后用“+”将文本框的Text属性值和列表框的Text属性值连接起来，因此输出“中国北京”。

  • 第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题：

    窗体上有一个命令按钮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是正确的。

相关内容