窗体上有一个名为List1的列表框，程序执行时在窗体上单击，输出的结果是( )。 Priate Sub Form_Click() For i=0 To List1．ListCount-1 If i Mod 2=0 Then Print List1．List(i)； End If Next i End Sub Private Sub Form_Load() List1．AddItem"中国" List1．AddItem"日本" List1．AddItem"韩国" List1．AddItem"新加坡" Lis

题目

窗体上有一个名为List1的列表框，程序执行时在窗体上单击，输出的结果是( )。 Priate Sub Form_Click() For i=0 To List1．ListCount-1 If i Mod 2=0 Then Print List1．List(i)； End If Next i End Sub Private Sub Form_Load() List1．AddItem"中国" List1．AddItem"日本" List1．AddItem"韩国" List1．AddItem"新加坡" List1．AddItem"香港" End Sub

A．中国韩国

B．日本新加坡

C．中国韩国香港

D．中国日本韩国新加坡香港

相似考题

1.（ 18 ）在程序运行时，下面的叙述中正确的是A ）用鼠标右键单击窗体中无控件的部分，会执行窗体的 Form_Load 事件过程B ）用鼠标左键单击窗体的标题栏，会执行窗体的 Form_Click 事件过程C ）只装入而不显示窗体，也会执行窗体的 Form_Load 事件过程D ）装入窗体后，每次显示该窗体时，都会执行窗体的 Form_Click 事件过程

2.在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：打开窗体运行后，单击命令按钮，消息框的输出结果为__________。

3.窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Command_Click()Dim a As Integer，b As Integera=8b=12Print Fun(a，b)；a；bEnd SubPrivate Function Fun(ByVal a As Integer，b As Integer)As Integera=a Mod 5b=b＼5Fun=aEnd Function程序运行时，单击命令按钮，则输出结果是A．3 3 2B．3 8 2C．8 8 12D．3 8 1 2

4.在程序运行时，下面的叙述中正确的是A．用鼠标右键单击窗体中无控件的部分，会执行窗体的Form. L0ad事件过程B．用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程C．只装入而不显示窗体，也会执行窗体的Form. Load事件过程D．装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件过程

更多“窗体上有一个名为List1的列表框,程序执行时在窗体上单击,输出的结果是()。Priate Sub Form_Click( ”相关问题

  • 第1题：

    有一个工程文件ylc.vbp(相应的窗体文件名为ylc5.frm)，在窗体上画一个名为List1的列表框和一个名为Text1的文本框。编写窗体的MouseDown事件。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框的项目；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表中删除。程序的运行情况如图23所示。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc5.vbp，窗体文件名为ylc5.frm。


    正确答案：1．操作步骤 (1)在Visual Basic集成环境选择“文件”→“打开工程”命令在对话框中选择ylc5.vbp工程文件单击“确定”按钮打开。 (2)在工具箱中选择ListBox控件在窗体上创建该控件命名为List1。在工具箱中选择TextBox控件在窗体中创建并命名为Text1标题为空。 2．行为编码 在代码窗口选择Form对象的MouseDown事件其行为代码如下： Private Sub Form MouseDown(Button As IntegerShift As Integer_ X As SingleY As Single) Select Case Button '若按下的是鼠标左键 Case 1 '将文本框中的内容加入列表框 List1.Addltem(Text1.Text) '清空文本框 Text1. Text=" " '若按下的是鼠标右键 Case 2 '删除列表框中与文本框相同的内容 For i=0 To List1.ListCount-1 If List1.List(i)=Text1.Text Then List1.Removeltem(i) Exit For End If Next i End Select End Sub 3．存盘保存 执行“文件”→“保存工程”命令工程文件名为ylc5.vbp窗体文件名为ylc5.frm。
    1．操作步骤 (1)在Visual Basic集成环境选择“文件”→“打开工程”命令，在对话框中选择ylc5.vbp工程文件，单击“确定”按钮打开。 (2)在工具箱中选择ListBox控件，在窗体上创建该控件，命名为List1。在工具箱中选择TextBox控件，在窗体中创建并命名为Text1，标题为空。 2．行为编码 在代码窗口选择Form对象的MouseDown事件，其行为代码如下： Private Sub Form. MouseDown(Button As Integer，Shift As Integer，_ X As Single，Y As Single) Select Case Button '若按下的是鼠标左键 Case 1 '将文本框中的内容加入列表框 List1.Addltem，(Text1.Text) '清空文本框 Text1. Text=" " '若按下的是鼠标右键 Case 2 '删除列表框中与文本框相同的内容 For i=0 To List1.ListCount-1 If List1.List(i)=Text1.Text Then List1.Removeltem(i) Exit For End If Next i End Select End Sub 3．存盘保存 执行“文件”→“保存工程”命令，工程文件名为ylc5.vbp，窗体文件名为ylc5.frm。 解析：(1)本题考查考生对ListBox控件的属性控制和操作，特别对鼠标按键的控制进行了仔细的考查。(2)注意使用ListBox控件的AddItem、RemoveItem方法、鼠标消息的控制。(3)本题是根据键码的值，使用Select语句来判断按下的是鼠标左键或右键。

  • 第2题：

    在考生文件夹中有一个工程文件execise50.vbp及窗体文件execise50.frm。在名为Form1的窗体上有一个名称为Cmd1，标题为“显示”的命令按钮，一个名称为List1的列表框。要求程序运行后，如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。

    要求：

    修改列表框的适当属性，使得运行时可以多选；去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。


    正确答案：

  • 第3题：

    在窗体上画一个名为Command1的命令按钮，编写如下程序：

    程序运行后，单击命令按钮，输出的结果是_________。


    正确答案：
    4
    【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。

  • 第4题：

    在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为；显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。

    要求；

    修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。


    正确答案：

  • 第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是正确的。

相关内容