电子科技大16春《VB程序设计》在线作业参考答案
电子科技大16春《VB程序设计》在线作业1一、单选题：
1.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是( )。 (满分:5)
A. Autosize
B. Stretch
C. Autoredraw
D. Appearance
2.窗体的MouseDown事件过程如下：FormMouseDown(Button As Integer,Shift As Integer, X As Single, Y As Single)其中有4个参数，关于这些参数，正确的描述是( )。 (满分:5)
A. 通过Button参数判定当前按下的是哪一个鼠标键
B. Shift参数只能用来确定是否按下Shift键
C. Shift参数只能用来确定是否按下Alt键和Ctrl键
D. 参数x、y用来设置鼠标当前位置的坐标
3.DataCombo控件的RowSource属性是表示( )。 (满分:5)
A. 给DataComebo控件提供列表项的字段
B. 目的表的数据源
C. 给DataCombo控件提供列表项的数据源
D. 更新目的表的字段
4.指出下面哪个语句不是写文件语句( )。 (满分:5)
A. Print
B. Output
C. Write
D. Put
5.ADO数据控件的RecordSoure属性是表示( )。 (满分:5)
A. 与ADO数据控件连接的数据库
B. 与数据库的连接方式
C. 数据库类型
D. ADO数据控件可访问的数据来源
6.设a=10,b=5,c=1,执行语句Print a>b>c后，窗体上显示的是( )。 (满分:5)
A. True
B. False
C. 1
D. 出错信息
7.设有如下程序：Option Base 0Private Sub FormClick( )DimaDim I As Integera=Array(1,2,3,4,5,6,7,8,9)For I=0 To 3Print a(5 - I);NextIEndSub程序运行后，单击窗体，则在窗体上显示的是( )。 (满分:5)
A. 4321
B. 5432
C. 6543
D. 7654
8.代码Command1.Caption=”退出”,其中Command1是( )，Caption是( ),“退出”是( )。请选择一个正确答案( )。 (满分:5)
A. 方法，事件，属性
B. 对象，属性，值
C. 对象，方法，值
D. 方法，对象，值
9.在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为：PrivateSubTimer1( )( )TxtTime.text=TimeEndSub在横线上应填入的内容是( )。 (满分:5)
A. Enabled
B. Visible
C. Interval
D. Timer
10.在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：Private Sub Command1Click( )S = 0For i = 1 To 15x=2*i-1if x Mod 3=0 Thens=s+1Next iLabel1.Caption=sEndSub程序运行后，单击命令按钮，则标签中显示的内容是( )。 (满分:5)
A. 1
B. 5
C. 27
D. 45
11.在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：Option Base 1Private Sub Command1Click( )Dim as = 0a = Array(1,2,3,4)j = 1For i = 4 To 1 Step - 1s = s + a(i) * jj = j * 10Next iPrint sEndSub运行上面的程序，单击命令按钮，其输出结果是( )。 (满分:5)
A. 4321
B. 1234
C. 34
D. 12
12.将命令按钮设为默认命令按钮，应设置为True的属性是( )。 (满分:5)
A. Value
B. Cancel
C. Default
D. Enabled
13.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1Click( )Move 500,500EndSub程序运行后，单击命令按钮，执行的操作为( )。 (满分:5)
A. 命令按钮移动到距窗体左边界、上边界各500的位置
B. 窗体移动到距屏幕左边界、上边界各500的位置
C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500
14.下列控件哪一个具有Align属性( )。 (满分:5)
A. 图像框
B. 图片框
C. 标签
D. 列表框
15.目录列表框的Path属性的作用是( )。 (满分:5)
A. 显示当前驱动器或指定驱动器上的目录结构
B. 显示当前驱动器或指定驱动器上的某目录下的文件名
C. 显示根目录下的文件名
D. 显示该路径下的文件
16.设组合框Combo1中有三个项目，则以下能删除最后一项的语句是( )。 (满分:5)
A. Combo1.RemoveItem Text
B. Combo1.RemoveItem 2
C. Combo1.RemoveItem 3
D. Combo1.RemoveItem Combo1.Listcount
17.为了把一个记录型变量的内容写入文件中指定的位置，要使用语句( )。 (满分:5)
A. Get文件号，记录号，变量名
B. Get文件号，变量名，记录号
C. Put文件号，变量名，记录号
D. Put文件号，记录号，变量名
18.有关控件数组特点，下面表达正确的是( )。 (满分:5)
A. Name相同，Intex不同
B. Name相同，Caption也相同
C. Name相同，ID不同
D. Name相同，TabIntex不同
19.关于复选框和单选按钮的Value属性，说法正确的是( )。 (满分:5)
A. 复选框的Value属性有2个值
B. 单选按钮的Value属性有3个值
C. Value属性的值都是True或False
D. 复选框的Value属性有3个值
20.设有如下通用过程：Public Sub Fun(a( ),ByVal x As Integer)For i = 1 To 5x = x + a(i)NextEndSub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程Private Sub Command1Click( ) Dim arr(5) As VariantFor i = 1 To 5arr(i) = iNextn = 10Call Fun(arr( ), n)Text1.Text = nEndSub程序运行后，单击命令按钮，则在文本框中显示的内容是( )。 (满分:5)
A. 10
B. 15
C. 25
D. 24
16春《VB程序设计》在线作业2
一、单选题：
1.下列列表框属性中哪一项不是数组( )。 (满分:5)
A. Selected
B. ListCount
C. List
D. Index
2.将命令按钮设为默认命令按钮，应设置为True的属性是( )。 (满分:5)
A. Value
B. Cancel
C. Default
D. Enabled
3.能够触发文本框Chang事件的操作是( )。 (满分:5)
A. 文本框失去焦点
B. 文本框获得焦点
C. 设置文本框的焦点
D. 改变文本框的内容
4.在下列动作中，不能引发命令按钮Click事件的是( )。 (满分:5)
A. 在按钮上单击鼠标左键
B. 在按钮上单击鼠标右键
C. 把焦点转移到按钮上，然后按回车
D. 如果按钮有快捷字母键，按Alt+快捷字母键
5.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1Click( )Dim a As Integer, s As Integera = 8a = 1Dos = s + aa = a - 1Loop While a <= 0Print s; aEndSub程序运行后，单击命令按钮，则窗体上显示的内容是( )。 (满分:5)
A. 79
B. 340
C. 97
D. 死循环
6.在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：Private Sub Command1Click( )S = 0For i = 1 To 15x=2*i-1if x Mod 3=0 Thens=s+1Next iLabel1.Caption=sEndSub程序运行后，单击命令按钮，则标签中显示的内容是( )。 (满分:5)
A. 1
B. 5
C. 27
D. 45
7.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是( )。 (满分:5)
A. Autosize
B. Stretch
C. Autoredraw
D. Appearance
8.有关控件数组特点，下面表达正确的是( )。 (满分:5)
A. Name相同，Intex不同
B. Name相同，Caption也相同
C. Name相同，ID不同
D. Name相同，TabIntex不同
9.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是( )。 (满分:5)
A. 工程资源管理器窗口
B. 工具箱窗口
C. 代码窗口
D. 属性窗口
10.为了保留动态数组中原有元素的值，需要使用关健字( )。 (满分:5)
A. Static
B. Preserve
C. Option Base
D. Option Compare
11.用下面语句定义的数组，其元素个数是( )。Dim A(-3 To 5) As Integer (满分:5)
A. 6
B. 7
C. 8
D. 9
12.以下能判断是否到达文件尾的函数是( )。 (满分:5)
A. BOF
B. LOC
C. LOF
D. EOF
13.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1Click( )Dim Array1(10,10) As IntegerDim i As Integer, j As IntegerFor i= 1 To 3For j = 2 To 4Array1(i,j) = i + jNext jNext iText1.Text = Array1(2,3) + Array1(3,4)EndSub程序运行后，单击命令按钮，在文本框中显示的值是( )。 (满分:5)
A. 15
B. 14
C. 13
D. 12
14.DataCombo控件的RowSource属性是表示( )。 (满分:5)
A. 给DataComebo控件提供列表项的字段
B. 目的表的数据源
C. 给DataCombo控件提供列表项的数据源
D. 更新目的表的字段
15.下列属性中哪个不是图片框的属性( )。 (满分:5)
A. Align
B. Picture
C. Stretch
D. AutoRedraw
16.ADO控件的RecordSet对象表示( )。 (满分:5)
A. 使用ADO控件连接的表
B. 使用ADO控件返回的查询结果
C. 使用ADO控件建立的筛选条件
D. 使用ADO控件添加的数据
17.当一个工程含有多个窗体时，其中的启动窗体是( )。 (满分:5)
A. 启动Vosual Basic时建立的窗体
B. 第一个添加的窗体
C. 最后一个添加的窗体工程属性
D. 在“工程属性”对话框中指定的窗体
18.在窗体上创建一个名称为Text1的文本框，并编写如下程序：Private Sub FormLoad( )ShowText1.Text=""Text1.SetFocusEndSubPrivate Sub FormMouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single)Print "程序设计"EndSubPrivate Sub Text1KeyDown(KeyCode As Integer,Shift As Integer)Print "Visual Basic";EndSub程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是( )。 (满分:5)
A. Visual Basic
B. “程序设计”
C. “A程序设计”
D. “Visual Basic程序设计”
19.代码Command1.Caption=”退出”,其中Command1是( )，Caption是( ),“退出”是( )。请选择一个正确答案( )。 (满分:5)
A. 方法，事件，属性
B. 对象，属性，值
C. 对象，方法，值
D. 方法，对象，值
20.在调用“打开”或“保存”文件对话框时，如果需要指定文件列表框列出的文件类型是.doc文件，则正确的描述格式是( )。 (满分:5)
A. CommonDialog1.Filter=“*.DOC|*.doc”
B. CommonDialog1.Filter=“文本文件（.doc）|（*.doc）”
C. CommonDialog1.Filter=“text(.doc)( )(*.doc)”
D. CommonDialog1.Filter=“text(.doc)(*.doc)”
16春《VB程序设计》在线作业3
一、单选题：
1.使文本框获得焦点的方法是( )。 (满分:5)
A. GotFocus
B. Change
C. ListFocus
D. SetFocus
2.以下关于焦点的叙述中，错误的是( )。 (满分:5)
A. 如果文本框的TabStop属性为False，则不能接收从键盘输入的数据
B. 当文本框失去焦点时，触发LostFocus事件
C. 当文本框的Enabled属性为False时，其Tab顺序不起作用
D. 可以用TabIndex属性改变Tab顺序
3.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是( )。 (满分:5)
A. 工程资源管理器窗口
B. 工具箱窗口
C. 代码窗口
D. 属性窗口
4.在下列动作中，不能引发命令按钮Click事件的是( )。 (满分:5)
A. 在按钮上单击鼠标左键
B. 在按钮上单击鼠标右键
C. 把焦点转移到按钮上，然后按回车
D. 如果按钮有快捷字母键，按Alt+快捷字母键
5.当拖动滚动条中的滚动块时，将触发滚动条的哪个事件( )。 (满分:5)
A. Move
B. Change
C. Scroll
D. SetFocus
6.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是( )。 (满分:5)
A. Autosize
B. Stretch
C. Autoredraw
D. Appearance
7.指出下面哪个语句不是写文件语句( )。 (满分:5)
A. Print
B. Output
C. Write
D. Put
8.下面叙述错误的是( )。 (满分:5)
A. 驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器
B. 目录列表框DirListBox显示当前驱动器分层目录树
C. 文件列表框FileListBox显示选定目录中的所有文件
D. 文件列表框FileName属性是设定允许显示文件名的文件类型
9.如果要改变窗体的标题，则需要设置的属性是( )。 (满分:5)
A. Caption
B. Name
C. BackColor
D. Borderstyle
10.在窗体上创建一个名称为Text1的文本框，并编写如下程序：Private Sub FormLoad( )ShowText1.Text=""Text1.SetFocusEndSubPrivate Sub FormMouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single)Print "程序设计"EndSubPrivate Sub Text1KeyDown(KeyCode As Integer,Shift As Integer)Print "Visual Basic";EndSub程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是( )。 (满分:5)
A. Visual Basic
B. “程序设计”
C. “A程序设计”
D. “Visual Basic程序设计”
11.当一个工程含有多个窗体时，其中的启动窗体是( )。 (满分:5)
A. 启动Vosual Basic时建立的窗体
B. 第一个添加的窗体
C. 最后一个添加的窗体工程属性
D. 在“工程属性”对话框中指定的窗体
12.为了保留动态数组中原有元素的值，需要使用关健字( )。 (满分:5)
A. Static
B. Preserve
C. Option Base
D. Option Compare
13.窗体上有一组合框Combol,窗体加载时的代码如下：Private Sub FormLoad( ) Combol. AddItem“电视机” Combol. AddItem“录像机” Combol. AddItem“VCD” Combol. AddItem“组合音响”End Sub要在文本框Textl中显示列表中的第三个项目，则正确的语句的是( )。 (满分:5)
A. Textl.Text=Combol.List(0)
B. Textl.Text=Combol.List(1)
C. Textl.Text=Combol.List(2)
D. Textl.Text=Combol.List(3)
14.在调用“打开”或“保存”文件对话框时，如果需要指定文件列表框列出的文件类型是.doc文件，则正确的描述格式是( )。 (满分:5)
A. CommonDialog1.Filter=“*.DOC|*.doc”
B. CommonDialog1.Filter=“文本文件（.doc）|（*.doc）”
C. CommonDialog1.Filter=“text(.doc)( )(*.doc)”
D. CommonDialog1.Filter=“text(.doc)(*.doc)”
15.DataCombo控件的RowSource属性是表示( )。 (满分:5)
A. 给DataComebo控件提供列表项的字段
B. 目的表的数据源
C. 给DataCombo控件提供列表项的数据源
D. 更新目的表的字段
16.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function f(m As Integer)If m Mod 2 = 0 Thenf = mElsef = 1End IfEnd FunctionPrivate Sub Command1Click( )Dim i As Integers = 0For i = 1 To 5s = s + f(i)NextPrint sEndSub程序运行后，单击命令按钮，在窗体上显示的是( )。 (满分:5)
A. 11
B. 10
C. 9
D. 8
17.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1Click( )Dim num As Integernum = 1Do Until num > 6Print num;num = num + 2.4LoopEndSub程序运行后，单击命令按钮，则窗体上显示的内容是( )。 (满分:5)
A. 1 3.4 5.8
B. 1 3 5
C. 1 4 7
D. 无数据输出
18.设有如下程序：Option Base 0Private Sub FormClick( )DimaDim I As Integera=Array(1,2,3,4,5,6,7,8,9)For I=0 To 3Print a(5 - I);NextIEndSub程序运行后，单击窗体，则在窗体上显示的是( )。 (满分:5)
A. 4321
B. 5432
C. 6543
D. 7654
19.目录列表框的Path属性的作用是( )。 (满分:5)
A. 显示当前驱动器或指定驱动器上的目录结构
B. 显示当前驱动器或指定驱动器上的某目录下的文件名
C. 显示根目录下的文件名
D. 显示该路径下的文件
20.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是( )。 (满分:5)
A. 单选按钮
B. 图片框
C. 通用对话框
D. 文本框
页:
[1]