电科20秋《VB程序设计》在线作业3[答案]满分答案
20秋《VB程序设计》在线作业3题目
试卷总分:100 得分:100
一、单选题 (共 20 道试题,共 100 分)
1.将命令按钮设为默认命令按钮，应设置为True的属性是（ ）。
A.Value
B.Cancel
C.Default
D.Enabled
2.DataCombo控件的RowSource属性是表示（ ）。
A.给DataComebo控件提供列表项的字段
B.目的表的数据源
C.给DataCombo控件提供列表项的数据源
D.更新目的表的字段
3.在下列动作中，不能引发命令按钮Click事件的是（ ）。
A.在按钮上单击鼠标左键
B.在按钮上单击鼠标右键
C.把焦点转移到按钮上，然后按回车
D.如果按钮有快捷字母键，按Alt+快捷字母键
4.以下关于焦点的叙述中，错误的是（ ）。
A.如果文本框的TabStop属性为False，则不能接收从键盘输入的数据
B.当文本框失去焦点时，触发LostFocus事件
C.当文本框的Enabled属性为False时，其Tab顺序不起作用
D.可以用TabIndex属性改变Tab顺序
5.可以与ADO数据控件绑定的控件必须具有（ ）属性。
A.Connectionstring
B.Caption
C.DataSource
D.RecordSource
6.在窗体上画一个名称为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
7.在Visual Basic6.0中，改变控制的位置可以通过设置（ ）属性来实现。
A.Left和Top
B.Width和Height
C.Left和Height
D.Width和Top
8.当拖动滚动条中的滚动块时，将触发滚动条的哪个事件（ ）。
A.Move
B.Change
C.Scroll
D.SetFocus
9.下列哪种说法正确的是（ ）。
A.通用对话框是Visual Basic 6.0的内部标准控件
B.要使用CommonDialog控件，必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0”
C.打开“部件”对话框只有一种方法
D.程序运行过程中，通用对话框在窗体中是可见的
10.在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s = 0 a = Array (1,2,3,4) j = 1 For i = 4 To 1 Step - 1 s = s + a (i) * j j = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是（ ）。
A.4321
B.1234
C.34
D.12
11.关于复选框和单选按钮的Value属性，说法正确的是（ ）。
A.复选框的Value属性有2个值
B.单选按钮的Value属性有3个值
C.Value属性的值都是True或False
D.复选框的Value属性有3个值
12.Sub过程与Function函数的最根本区别是（ ）。
A.Function过程可以有参数，而Sub过程不可以
B.两种过程参数的传递方式不同
C.Sub过程无返回值，但Function过程有返回值
D.Sub过程是语句级调用，可以使用Call或直接使用过程名，但Function过程是在表达式中调用
13.目录列表框的Path属性的作用是（ ）。
A.显示当前驱动器或指定驱动器上的目录结构
B.显示当前驱动器或指定驱动器上的某目录下的文件名
C.显示根目录下的文件名
D.显示该路径下的文件
14.有关控件数组特点，下面表达正确的是（ ）。
A.Name相同，Intex不同
B.Name相同，Caption也相同
C.Name相同，ID不同
D.Name相同，TabIntex不同
15.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim array1(10,10) As Integer Dim I, j As Integer For I=1 To 3 For j=2 To 4 array1(I, j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（ ）。
A.12
B.13
C.14
D.15
16.执行语句：Open "Tel.dat" For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是（ ）。
A.只能写，不能读
B.只能读，不能写
C.既可以读，也可以写
D.不能读，不能写
17.窗体上有一组合框Combol,窗体加载时的代码如下： Private Sub Form_Load() Combol. AddItem“电视机” Combol. AddItem“录像机” Combol. AddItem“VCD” Combol. AddItem“组合音响” End Sub 要在文本框Textl中显示列表中的第三个项目，则正确的语句的是（ ）。
A.Textl.Text=Combol.List(0)
B.Textl.Text=Combol.List(1)
C.Textl.Text=Combol.List(2)
D.Textl.Text=Combol.List(3)
18.定时器控件Interval属性最多只能设置（ ）。
A.1分多钟
B.半分多钟
C.2分多钟
D.10分钟
