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

例题

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

1.'功能：以下程序段用于计算n的阶乘：n！。（1！=1）

2. 已知某城市一年的交通事故车辆报废情况，编程序计算该城市的交通事故一年损失金额。 3. 下面的程序用\冒泡\法将数组a中的10个整数按从小到大排列，请将程序补充完整。 4. '程序运行界面。键盘输入3个数，将它们按由大到小的顺序输出，-1为结束标志。

5. '在窗体有三个复选框，名称分别为 Ch1、Ch2和Ch3，标题依次为'\体育\、\音乐\、\美术\，还有一个命令按钮，名称为C1，标题'为\显示\。要求程序运行后，如果选中某个复选框，则当单击'\显示\命令按钮时，则显示相应的信息。例如，如果选中\体育\和\音乐\复选框，则单击\显示\命令按钮后，在窗体上显示'\我的爱好是体育音乐\（如图1所示）；而如果选中\体育\、'\音乐\和\美术\复选框，则单击\显示\按钮后，在窗体上显示\我的爱好是体育音乐美术\。

6. 窗体上建立了一个文本框Text1(\输入口令\和一个命令按钮Command1(\检查\。' 判断密码是否正确，并显示相应提示在加载窗体时设置密码框最大长度为8，密码显示字符为“*” 7. 下面的程序用于求三个数中最大数

8. 要求输入若干学生的成绩，计算平

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事件中

《vb程序设计》期末复习题及答案

一、填空题

1．创建一个VB应用程序三个主要的步骤是__________________、________________和_____________________。

2．当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的__________窗口中，把此文本框的_____________属性设置成空白。

3．Label和TextBox控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用___________控件；若允许用户输入文本，则应使用_____________控件。 4．窗体的常用方法有__________、___________、___________和___________。 5．要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK ，应当编写的语句是____________________________________。

6．若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1，请对以下事件过程填空。

Private Sub Cmdopen_ ___________ _____________________

《vb程序设计》期末复习题及答案

一、填空题

1．创建一个VB应用程序三个主要的步骤是__________________、________________和_____________________。

2．当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的__________窗口中，把此文本框的_____________属性设置成空白。

3．Label和TextBox控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用___________控件；若允许用户输入文本，则应使用_____________控件。 4．窗体的常用方法有__________、___________、___________和___________。 5．要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK ，应当编写的语句是____________________________________。

6．若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1，请对以下事件过程填空。

Private Sub Cmdopen_ ___________ _____________________

VB程序设计结构：顺序结构、分支结构、循环结构。 二、分支结构：

一、顺序结构题： 1、以下程序段的执行结果是?

A=1

b=5

c=4

a=b

b=c

c=a

Print a;b;c 3、下面程序段的划线部分应是? A=356 b=214 t=a a=b print a;b 运行结果 214356

5、经过几下几条语句，A和B的 值分别为多少？ A=6 B=7 C=A A=B B=C

2、该程序段运行后， 变量b的值为 ? a=7 b=8 a=a+b b=a-b 4、该程序段运行后，变量a的值为 ? a=8 b=7 z=a a=b b=z 6、Text1和Text2中分别输入5，6，求Labe7l中值？ Dim X AS Single, Y AS Single, Z AS Single X=Val（Text1.text） Y=Val（Text2.text） Z=X*Y／10 Label7.caption=Z

IF <条件> Then 当条件满足时，执行语句组1 <语句组1> 当条件不满足时，执行

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、 当建立好一个简单的应用程序后，假定该