大一vb程序设计题库及答案

9、Visual Basic程序改错

1. 程序功能：求s=1+3+5+7+...直到s>2000为止。程序中有两行有错误。改正错误，使它能输出正确的结果。 (2025) 平方和

Private Sub Form_Click()

Dim i As Integer, s As Long s = 0 : i = 1

Do Until s < 2000 s = s + i i = i + 1 Loop Print s End Sub

答案：s>2000 ; i+2

2. 程序功能：计算s=2!+4!+8!。程序中有两行有错误。

改正错误，使它能输出正确的结果。 (40346) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 i = 1

Do While i <= 3 t = 1 k = 1

While k <= 2*i t = t * k k = k + 1 Wend s = s + t i = i + 1 wend Print s End Sub

答案：k<=2^i ; loop

3. 程序功能：计算s=2!+4!+6!+8!。程序中有错误。改正错误，使它能输出正确的结果。 (41066) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 : i = 1

Do While

程序设计 第一题 题目：（事件）单击窗体

（响应）求50以内所有偶数的和，并在窗体上输出来。 将结果存入变量S中。 代码：Dim I As Integer For i = 2 To 50

If (i Mod 2)=0 Then S=s+i End If Next

Print (CStr(s)) 第二题 题目：（事件）双击窗体

（响应）求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中 代码：Dim i,j As Integer Dim k As Long k=1 s=0

For i =1To 10 For j=1 To i k=k*j Next s=s+k k=1 Next

Print(CStr(s)) 第三题 题目：（事件）单击窗体

（响应）求100以内偶数的和，并将结果输出在窗体上。

例题1-1. Visual Basic中的标准模块文件的扩展名是________。 A. reg B. frm C. bas D. vbp 例题1-2. VB的使用目的是________。

A. 开发Windows应用程序 B. 图像处理

C. 制作WAV文件 D. 文字处理

例题1-3. Visual Basic是一种面向________的程序设计语言。

A. 过程 B. 用户 C. 方法 D. 对象

例题1-5. Visual Basic是用于开发________环境下的应用程序的

工具。

A. DOS B. Windows

C. DOS和Windows D. UNIX

例题2-1. 在设计列表框时，若实现输入多行文字的目的，应使用

________键实现文本的换行。

A. Enter B. Alt+Enter C. Ctrl+Shift+Enter D. Ctrl+Enter

例题

《VB程序设计》作业（一）

客观题部分：

选择题（每题1分，共15题）

1. 下列哪个选项不是Visual Basic语言的特点（ D ）。 A） 事件驱动编程机制 B） 可视化编程 C） 结构化程序设计 D） 面向过程的程序设计

2. Visual Basic的版本中不包含（ D ）。 A）学习版

B）专业版

C）企业版

D）标准版

3. 下列选项中不属于主窗口的是（ C ）。 A）工具栏

B）菜单栏

C）状态栏

D）标题栏

4. 下列（ D ）计量单位是与屏幕分辨率无关的。 A）twip

B）Point

C）Pixel

D）Inch

5. 工程资源管理器窗口不能显示（ D ）文件。 A） 窗体文件(.frm) B） 标准模块文件(.bas) C） 控件文件（.ctl） D） 资源文件（.res）

vbp 工程文件 frm 窗体文件 cls 类模块文件 ctl 用户控件文件 pag 属性页文件 bas 模块文件 6. 下列（ B ）方法不能打开工程资源管理器窗口。 A） 单击工具栏上的“工程资源管理器”按钮 B） 双击窗体或窗体上的控件 C） 按Ctrl＋R组合键

D） 执行“视图”菜单中的“工程资源管理器”命令

9、Visual Basic程序改错

1. 程序功能：求s=1+3+5+7+...直到s>2000为止。程序中有两行有错误。改正错误，使它能输出正确的结果。 (2025) 平方和

Private Sub Form_Click()

Dim i As Integer, s As Long s = 0 : i = 1

Do Until s < 2000 s = s + i i = i + 1 Loop Print s End Sub

答案：s>2000 ; i+2

2. 程序功能：计算s=2!+4!+8!。程序中有两行有错误。

改正错误，使它能输出正确的结果。 (40346) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 i = 1

Do While i <= 3 t = 1 k = 1

While k <= 2*i t = t * k k = k + 1 Wend s = s + t i = i + 1 wend Print s End Sub

答案：k<=2^i ; loop

3. 程序功能：计算s=2!+4!+6!+8!。程序中有错误。改正错误，使它能输出正确的结果。 (41066) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 : i = 1

Do While

《VISUAL BASIC》教学执行大纲

(试行稿)

[适用于计算机应用专业(学分制) 100学时]

(二○○八年二月制订)

一、课程内容 （一）概 论

1、VISUAL BASIC发展概述 2、VB.NET 语言及特点简介 3、VB.NET集成开发环境

（二）数据类型与运算表达式

1、 对象和类 2、 属性、事件和方法 3、 变量与数据类型 4、 运算符与表达式 5、 结构类型及其数组

(三)控制结构

1、 顺序结构 2、 选择结构 3、 循环结构 4、 其他控制语句

（四） 数 组

1、 数组定义及基本操作 2、 数组排序 3、 结构类型及引用 4、 结构数组及应用

（五）函数过程

1、 函数过程的定义和调用 2、 子过程的定义与调用 3、 参数传递 4、 函数的递归调用

1

（六）常用标准控件

1、 常用控件 2、 鼠标事件 3、 键盘事件 4、 用户界面设计

（七）文件操作

1、 文件及其结构 2、 顺序访问模式 3、 随机访问模式

（八）数据库

VB程序设计

一、判断题

1. 同一Form窗体中的各控件可以相互重叠，其显示的上下层次的次序不可以调整。（ X ） 2. 一个对象的若能识别多个事件，我们只能对其中一个事件编程（ ? ）

3. 单选按钮与复选框对象的Value属性类型不同，且只能取值True和False。（ √ ） 4. 事件过程由某个用户事件或系统事件触发执行，它不能被其他过程调用。（ ? ） 5. 图片框的Move方法不仅可以移动图片框，而且还可以改变该图片框的大小，同时也会改变该图片框有关属性的值。（ √ ）

6. “A=B=C”是一个合法的Visual Basic语句。（ ? ）

7. 当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时，组合框会自动把这一条目添加到它的列表框中。（ ? ）

8. Visual Basic程序的运行可以从 Main（）过程启动，也可以从某个窗体启动。（ √ ） 9. 在图片框中放置的控件既可以在该图片框内移动，也可以移出该图片框外。（? ） 10. 对于文件系统控件，当驱动器控件Drivel中的驱动器符改变时，文件夹列表控件Dir1中显示的文件夹也作相应的改变，可以在Drive1中的Change事件中

程序设计语言教程(人民邮电出版社)第三章课后习题答案

3.2习题 一、选择题

1. 下列赋值语句中（C）是错误的。

(A) x＝x＋１ (B) x＝x＋y (C) x＋y＝x (D) x＝４＞６ ２. 下列赋值语句中（D）是正确的。

(A) x！＝＂abc＂ (B) a％＝＂１０ｅ＂ (C) x＋１＝５ (D) s＄＝１００

3. 若在消息框中显示＂确定（Ok）＂和＂取消（Cancel）＂两个按钮，则buttons参数的设置值是（B）。

(A)0 (B)1 (A)2

(B)3

(C)2 (D)3

(C)4 (D)5

4. 若在消息框中显示＂是（Yes）＂和＂否（No）＂两个按钮，则buttons参数的设置值是（C）。 5. 若要改变窗体中显示文本的颜色，可以设置（C）属性来实现。 (A)Caption (B)BackColor (C)ForeColor (D)Font 6. 若在消息框中选择第二个按钮为默认值，则buttons参数的设置值是（B）。 (A)0 (B)256 (C)512

VB课后习题解答

第一、二章：

1、 简述VB6.0的主要特点

答：方便、直观的可视化设计工具；面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境；结构化程序设计语言；完备的联机帮助功能；强大的多媒体、数据库和网络功能。 2、 当正常安装VB6.0后，误把Windows子目录删除。当重新安装Windows后，是否需要再次安装VB6.0？

答：要重新安装的。因为安装VB6.0时，有些VB程序被系统自动安装在Windows目录下，所以一旦删除Windows子目录，就必须重新安装VB6.0。

3、 Visual Basic 6.0分为学习版、专业版和企业版，如何知道所安装的是哪个版本？

答：在VB6.0的启动界面上，能显示对应的版本。 4、 叙述建立一个完整应用程序的过程

答：首先建立用户界面的控件对象（简称控件）；然后对控件属性进行设置；再对控件事件过程及编程；保存应用程序；程序调试和运行。

5、 Visual Basic 6.0有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？

答：选择“视图”—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码”按钮。 6、 当建立好一个简单的应用程序后，假定该

一、单选 共300题 （共计300分）

滚动条的( )属性用于指定用户单击滚动条的滚动箭头时,Value属性值的改变量. A:Value B:LargeChange C:Change D:SmallChange 答案：D

运行时,当用户向文本框输入新的内容,或在程序代码中对文本框 的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文 本框的()事件. A:CLICK B:DBLCLICK C:GOTFOCUS D:CHANGE 答案：D

要获得用户在组合框输入的内容,应利用的组合框的属性是( ). A:List B:ListIndex C:Selected D:Text 答案：D

输入对话框InputBox的返回值的类型是 . A:长整数

1

B:字符串 C:浮点数 D:整数 案：B

要使得标签能自动扩充以满足字体大小则可对其()属性进行设置. A:alignment B:usemnemonic C:autosize D:tag 答案：C

假设变量BOOLVAR是一个布尔型变量,则下面正确的赋值语句是(). A:BOOLVAR='TRUE' B:BOOLVAR=.TRUE. C:BOOLVAR=#TR