电子科大20春《VB程序设计》在线作业1参考答案

电子科大20春《VB程序设计》在线作业1 试卷总分:100 得分:100

一、单选题 (共 20 道试题,共 100 分)

1.在窗体中添加一个命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer, b As Integer a=InputBox(\Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是（ ）。 A.456 B.246 C.123123 D.123 答案:B

2.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2,4,6 x = 20 Case Is<10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（ ）。 A.40 B.30 C.20 D.10 答案:D

3.指出下面哪个语句不是写文件语句（ ）。 A.Write B.Put C.Print D.Output 答案:D

4.窗体上有一组合框Combol,窗体加载时的代码如下： Private Sub Form_Load() Combol. AddItem“电视机” Combol. AddItem“录像机” Combol. AddItem“VCD” Combol. AddItem“组合音响” End Sub 要在文本框Textl中显示列表中的第三个项目，则正确的语句的是（ ）。 A.Textl.Text=Combol.List(3) B.Textl.Text=Combol.List(2) C.Textl.Text=Combol.List(1) D.Textl.Text=Combol.List(0) 答案:B

5.设组合框Combo1中有三个项目，则以下能删除最后一项的语句是（ ）。 A.Combo1.RemoveItem Text

B.Combo1.RemoveItem Combo1.Listcount C.Combo1.RemoveItem 3