电科18春《VB程序设计》在线作业2答案满分答案
18春《VB程序设计》在线作业2-0001
试卷总分:100 得分:0
一、 单选题 (共 20 道试题,共 100 分)
1.指出下面哪个语句不是写文件语句（ ）。
A.Print
B.Output
C.Write
D.Put
专业答案:----
2.以下叙述中正确的是（ ）。
A.窗体的Name属性指定窗体的名称，用来标识一个窗体
B.窗体的Name属性的值是显示在窗体标题栏中的文本
C.可以在运行期间改变对象的Name属性的值
D.对象的Name属性值可以为空
正确答案:----
3.设组合框Combo1中有三个项目，则以下能删除最后一项的语句是（ ）。
A.Combo1.RemoveItem Text
B.Combo1.RemoveItem 2
C.Combo1.RemoveItem 3
D.Combo1.RemoveItem Combo1.Listcount
专业答案:----
4.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num > 6 Print num; num = num + 2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（ ）。
正确选项:----
A.1 3.4 5.8
B.1 3 5
C.1 4 7
D.无数据输出
正确选项:----
5.如果要在菜单中添加一个分隔线，则应将其Caption属性设置为（ ）。
A.*
B.=
C.&
D.-
正确选项:----
6.目录列表框的Path属性的作用是（ ）。
A.显示当前驱动器或指定驱动器上的目录结构
B.显示当前驱动器或指定驱动器上的某目录下的文件名
C.显示根目录下的文件名
D.显示该路径下的文件
正确选项:----
7.在窗体上画一个名称为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.10
B.20
C.30
D.40
专业答案:----
8.在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1____() TxtTime.text=Time End Sub 在横线上应填入的内容是（ ）。
正确答案:----
A.Enabled
B.Visible
专业答案:----
C.Interval
D.Timer
专业答案:----
9.设有如下通用过程： Public Sub Fun(a(),ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程 Private Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) Text1.Text = n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。
正确选项:----
A.10
B.15
C.25
D.24
正确答案:----
10.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（ ）。
A.工程资源管理器窗口
B.工具箱窗口
C.代码窗口
D.属性窗口
正确答案:----
11.下列哪种说法正确的是（ ）。
A.通用对话框是Visual Basic 6.0的内部标准控件
B.要使用CommonDialog控件，必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0”
正确答案:----
C.打开“部件”对话框只有一种方法
正确选项:----
D.程序运行过程中，通用对话框在窗体中是可见的
专业答案:----
12.下列控件哪一个具有Align属性（ ）。
A.图像框
B.图片框
C.标签
D.列表框
正确选项:----
13.以下关于焦点的叙述中，错误的是（ ）。
A.如果文本框的TabStop属性为False，则不能接收从键盘输入的数据
B.当文本框失去焦点时，触发LostFocus事件
C.当文本框的Enabled属性为False时，其Tab顺序不起作用
正确选项:----
D.可以用TabIndex属性改变Tab顺序
正确选项:----
14.窗体的MouseDown事件过程如下： Form_MouseDown(Button As Integer,Shift As Integer, X As Single, Y As Single) 其中有4个参数，关于这些参数，正确的描述是（ ）。
专业答案:----
A.通过Button参数判定当前按下的是哪一个鼠标键
B.Shift参数只能用来确定是否按下Shift键
C.Shift参数只能用来确定是否按下Alt键和Ctrl键
D.参数x、y用来设置鼠标当前位置的坐标
正确答案:----
15.设有如下程序： Option Base 0 Private Sub Form_Click() Dim a Dim I As Integer a=Array(1,2,3,4,5,6,7,8,9) For I=0 To 3 Print a(5 - I); Next I End Sub 程序运行后，单击窗体，则在窗体上显示的是（ ）。
正确选项:----
A.4321
B.5432
C.6543
D.7654
正确选项:----
16.将命令按钮设为默认命令按钮，应设置为True的属性是（ ）。
A.Value
B.Cancel
C.Default
正确答案:----
D.Enabled
专业答案:----
17.设a=3,b=5,则以下表达式值为真的是（ ）。
A.a>=b And b>10
正确选项:----
B.a>b) or (b>0)
C.(a<0) Eqv (b>0)
D.(-3=5>a) And (b>0)
专业答案:----
18.下列属性中哪个不是图片框的属性（ ）。
A.Align
B.Picture
C.Stretch
D.AutoRedraw
正确选项:----
19.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（ ）。
A.单选按钮
B.图片框
C.通用对话框
D.文本框
专业答案:----
20.下面叙述错误的是（ ）。
A.驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器
正确选项:----
B.目录列表框DirListBox显示当前驱动器分层目录树
专业答案:----
C.文件列表框FileListBox显示选定目录中的所有文件
D.文件列表框FileName属性是设定允许显示文件名的文件类型
专业答案:----
电科18春《VB程序设计》在线作业2答案历年参考题目如下：
