14秋《VB程序设计》在线作业答案
14秋《VB程序设计》在线作业1试卷总分：100 测试时间：--
一、单选题（共20道试题，共100分。）
1.在窗体上画一个名称为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分
2.ADO控件的RecordSet对象表示（ ）。
A. 使用ADO控件连接的表
B. 使用ADO控件返回的查询结果
C. 使用ADO控件建立的筛选条件
D. 使用ADO控件添加的数据
满分：5分
3.在下列动作中，不能引发命令按钮Click事件的是（ ）。
A. 在按钮上单击鼠标左键
B. 在按钮上单击鼠标右键
C. 把焦点转移到按钮上，然后按回车
D. 如果按钮有快捷字母键，按Alt+快捷字母键
满分：5分
4.为了保留动态数组中原有元素的值，需要使用关健字（ ）。
A. Static
B. Preserve
C. Option Base
D. Option Compare
满分：5分
5.执行语句：Open "Tel.dat" For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是（ ）。
A. 只能写，不能读
B. 只能读，不能写
C. 既可以读，也可以写
D. 不能读，不能写
满分：5分
6.在窗体上创建一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text="" Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single) Print "程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic"; End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是（ ）。
A. Visual Basic
B. “程序设计”
C. “A程序设计”
D. “Visual Basic程序设计”
满分：5分
7.在窗体上画一个命令按钮（其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
满分：5分
8.用下面语句定义的数组，其元素个数是（ ）。 Dim A (-3 To 5) As Integer
A. 6
B. 7
C. 8
D. 9
满分：5分
9.代码Command1.Caption=”退出”,其中Command1是（ ），Caption是（ ）,“退出”是（ ）。请选择一个正确答案（ ）。
A. 方法，事件，属性
B. 对象，属性，值
C. 对象，方法，值
D. 方法，对象，值
满分：5分
10.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Move 500,500 End Sub 程序运行后，单击命令按钮，执行的操作为（ ）。
A. 命令按钮移动到距窗体左边界、上边界各500的位置
B. 窗体移动到距屏幕左边界、上边界各500的位置
C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500
满分：5分
11.ADO数据控件的RecordSoure属性是表示（ ）。
A. 与ADO数据控件连接的数据库
B. 与数据库的连接方式
C. 数据库类型
D. ADO数据控件可访问的数据来源
满分：5分
12.Sub过程与Function函数的最根本区别是（ ）。
A. Function过程可以有参数，而Sub过程不可以
B. 两种过程参数的传递方式不同
C. Sub过程无返回值，但Function过程有返回值
D. Sub过程是语句级调用，可以使用Call或直接使用过程名，但Function过程是在表达式中调用
满分：5分
13.在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() S = 0 For i = 1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是（ ）。
A. 1
B. 5
C. 27
D. 45
满分：5分
14.可以与ADO数据控件绑定的控件必须具有（ ）属性。
A. Connectionstring
B. Caption
C. DataSource
D. RecordSource
满分：5分
15.在窗体上画一个名称为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
满分：5分
16.DataCombo控件的RowSource属性是表示（ ）。
A. 给DataComebo控件提供列表项的字段
B. 目的表的数据源
C. 给DataCombo控件提供列表项的数据源
D. 更新目的表的字段
满分：5分
17.在Visual Basic6.0中，改变控制的位置可以通过设置（ ）属性来实现。
A. Left和Top
B. Width和Height
C. Left和Height
D. Width和Top
满分：5分
18.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 a = 1 Do s = s + a a = a - 1 Loop While a <= 0 Print s; a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是（ ）。
A. 7 9
B. 34 0
C. 9 7
D. 死循环
满分：5分
19.将命令按钮设为默认命令按钮，应设置为True的属性是（ ）。
A. Value
B. Cancel
C. Default
D. Enabled
满分：5分
20.定义一个常量PI，可以使用下列语句中的（ ）。
A. .PI=3.14159
B. Set PI = 3.14159
C. Const PI = 3.14159
D. Const PI
满分：5分
14秋《VB程序设计》在线作业2
试卷总分：100 测试时间：--
一、单选题（共20道试题，共100分。）
1.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Array1(10,10) As Integer Dim i As Integer, 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. 15
B. 14
C. 13
D. 12
满分：5分
2.目录列表框的Path属性的作用是（ ）。
A. 显示当前驱动器或指定驱动器上的目录结构
B. 显示当前驱动器或指定驱动器上的某目录下的文件名
C. 显示根目录下的文件名
D. 显示该路径下的文件
满分：5分
3.在调用“打开”或“保存”文件对话框时，如果需要指定文件列表框列出的文件类型是.doc文件，则正确的描述格式是（ ）。
A. CommonDialog1.Filter=“*.DOC|*.doc”
B. CommonDialog1.Filter=“文本文件（.doc）|（*.doc）”
C. CommonDialog1.Filter=“text(.doc)||(*.doc)”
D. CommonDialog1.Filter=“text(.doc)(*.doc)”
满分：5分
4.为了把一个记录型变量的内容写入文件中指定的位置，要使用语句（ ）。
A. Get文件号，记录号，变量名
B. Get文件号，变量名，记录号
C. Put文件号，变量名，记录号
D. Put文件号，记录号，变量名
满分：5分
5.设有语句：x=InputBox("输入数值","0","示例") 程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（ ）。
A. 变量x的值是数值10
B. 在inputbox对话框标题栏中显示的是“示例”
C. 0是默认值
D. 变量x的值是字符串“10”
满分：5分
6.在窗体中添加一个命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer, b As Integer a=InputBox("Enter the Firstinteger") b=InputBox("Enter the Secondinteger") Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是（ ）。
A. 246
B. 123
C. 456
D. 123123
满分：5分
7.指出下面哪个语句不是写文件语句（ ）。
A. Print
B. Output
C. Write
D. Put
满分：5分
8.如果要改变窗体的标题，则需要设置的属性是（ ）。
A. Caption
B. Name
C. BackColor
D. Borderstyle
满分：5分
9.以下关于焦点的叙述中，错误的是（ ）。
A. 如果文本框的TabStop属性为False，则不能接收从键盘输入的数据
B. 当文本框失去焦点时，触发LostFocus事件
C. 当文本框的Enabled属性为False时，其Tab顺序不起作用
D. 可以用TabIndex属性改变Tab顺序
满分：5分
10.下列哪种说法正确的是（ ）。
A. 通用对话框是Visual Basic 6.0的内部标准控件
B. 要使用CommonDialog控件，必须在“工程”菜单下的“部件”对话框中选定“Microsoft Common Dialog Control 6.0”
C. 打开“部件”对话框只有一种方法
D. 程序运行过程中，通用对话框在窗体中是可见的
满分：5分
11.设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)
满分：5分
12.窗体的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用来设置鼠标当前位置的坐标
满分：5分
13.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是（ ）。
A. 11
B. 10
C. 9
D. 8
满分：5分
14.设组合框Combo1中有三个项目，则以下能删除最后一项的语句是（ ）。
A. Combo1.RemoveItem Text
B. Combo1.RemoveItem 2
C. Combo1.RemoveItem 3
D. Combo1.RemoveItem Combo1.Listcount
满分：5分
15.如果要在菜单中添加一个分隔线，则应将其Caption属性设置为（ ）。
A. *
B. =
C. &
D. -
满分：5分
16.以下能判断是否到达文件尾的函数是（ ）。
A. BOF
B. LOC
C. LOF
D. EOF
满分：5分
17.下面叙述错误的是（ ）。
A. 驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器
B. 目录列表框DirListBox显示当前驱动器分层目录树
C. 文件列表框FileListBox显示选定目录中的所有文件
D. 文件列表框FileName属性是设定允许显示文件名的文件类型
满分：5分
18.当一个工程含有多个窗体时，其中的启动窗体是（ ）。
A. 启动Vosual Basic时建立的窗体
B. 第一个添加的窗体
C. 最后一个添加的窗体工程属性
D. 在“工程属性”对话框中指定的窗体
满分：5分
19.设a=10,b=5,c=1,执行语句Print a>b>c后，窗体上显示的是（ ）。
A. True
B. False
C. 1
D. 出错信息
满分：5分
20.下列哪些方法不属于通用对话框（ ）。
A. ShowColor
B. ShowFont
C. ShowPrint
D. ShowList
满分：5分
14秋《VB程序设计》在线作业3
试卷总分：100 测试时间：--
一、单选题（共20道试题，共100分。）
1.下列列表框属性中哪一项不是数组（ ）。
A. Selected
B. ListCount
C. List
D. Index
满分：5分
2.设有如下通用过程： 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
满分：5分
3.设在菜单编辑器中定义了一个菜单项，名为Menu1,为了在运行时隐藏该菜单项应使用的语句是（ ）。
A. Menu1.Enabled=True
B. Menu1.Enabled=False
C. Menu1.Visible=True
D. Menu1.Visible=False
满分：5分
4.使文本框获得焦点的方法是（ ）。
A. GotFocus
B. Change
C. ListFocus
D. SetFocus
满分：5分
5.下列哪个属性设置文本框中文字的对齐方式（ ）。
A. SelLength
B. Alignment
C. Multiline
D. ScrollBars
满分：5分
6.在窗体上画一个名称为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
满分：5分
7.以下叙述中正确的是（ ）。
A. 窗体的Name属性指定窗体的名称，用来标识一个窗体
B. 窗体的Name属性的值是显示在窗体标题栏中的文本
C. 可以在运行期间改变对象的Name属性的值
D. 对象的Name属性值可以为空
满分：5分
8.下列属性中哪个不是图片框的属性（ ）。
A. Align
B. Picture
C. Stretch
D. AutoRedraw
满分：5分
9.下列控件哪一个具有Align属性（ ）。
A. 图像框
B. 图片框
C. 标签
D. 列表框
满分：5分
10.定时器控件Interval属性最多只能设置（ ）。
A. 1分多钟
B. 半分多钟
C. 2分多钟
D. 10分钟
满分：5分
11.设有如下程序： 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
满分：5分
12.能够触发文本框Chang事件的操作是（ ）。
A. 文本框失去焦点
B. 文本框获得焦点
C. 设置文本框的焦点
D. 改变文本框的内容
满分：5分
13.当拖动滚动条中的滚动块时，将触发滚动条的哪个事件（ ）。
A. Move
B. Change
C. Scroll
D. SetFocus
满分：5分
14.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，该属性是（ ）。
A. Autosize
B. Stretch
C. Autoredraw
D. Appearance
满分：5分
15.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（ ）。
A. 工程资源管理器窗口
B. 工具箱窗口
C. 代码窗口
D. 属性窗口
满分：5分
16.关于复选框和单选按钮的Value属性，说法正确的是（ ）。
A. 复选框的Value属性有2个值
B. 单选按钮的Value属性有3个值
C. Value属性的值都是True或False
D. 复选框的Value属性有3个值
满分：5分
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)
满分：5分
18.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（ ）。
A. 单选按钮
B. 图片框
C. 通用对话框
D. 文本框
满分：5分
19.在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1____() TxtTime.text=Time End Sub 在横线上应填入的内容是（ ）。
A. Enabled
B. Visible
C. Interval
D. Timer
满分：5分
20.有关控件数组特点，下面表达正确的是（ ）。
A. Name相同，Intex不同
B. Name相同，Caption也相同
C. Name相同，ID不同
D. Name相同，TabIntex不同
满分：5分
答案请在附件下载，需要辅导请联系客服qq 1647861640
页:
[1]