经济学2010级vb上机实习题目
青岛科技大学VB上机实验答案
实验一 VB环境和简单应用程序设计（4个学时）一、实验目的1.熟悉Visual Basic集成开发环境的使用。
2.掌握建立、编辑和运行简单的Visual Basic应用程序的全过程。
3.掌握窗体对象的属性、事件和方法。
二、实验内容1. 在VB的集成开发环境中实现如下的操作：1）、将“标准”工具栏去掉后再添加上，将“编辑”工具栏添上再去掉。
2)、分别利用“菜单”和“工具栏”中的命令打开“属性窗口”、“工程资源管理器窗口”3）、将“窗体布局窗口“的”启动位置“设置成“手工”。
4)、在工具箱中任意添加一个Active X 控件。
5）、在工程1中增加两个窗体：Form1、Form26）、在工程1中增加两个标准模块：Module1 、Module27）、在工程1中增加一个类模块：Class18）、在工程资源管理器中将Form2、Module2 删除。
9）、在在工程资源管理器中利用“切换文件夹”按钮隐藏或显示对象的文件夹10）、将代码窗口中的字体大小改为18号字。
2．设计一个窗体，窗体内有1个文本框和3个命令按钮控件。
要求：当按“显示”按扭时，在文本框内显示“欢迎来到青岛科技大学！”一串红色、四号、隶书字符串。
当按“清除”按钮时，清除文本框内全部信息；当按“退出”按钮时，结束程序运行。
1) 创建界面（将设计好的界面截下来粘贴在下面）3)代码设计Private Sub Command1_Click()T ext1.T ext = "欢迎来到青岛科技大学！"End SubPrivate Sub Command2_Click()T ext1.T ext = ""End SubPrivate Sub Command3_Click()EndEnd Sub4)调试过程记录（错误情况及改正方法，不得少于三条）1、text1与text颠倒了位置通过查课本改正3. 设计一个窗体，在窗体上添加一个文本框和三个命令按钮。
vb上机练习题及答案
vb上机练习题及答案一、基本要求熟悉VB集成开发环境掌握代码窗口的应用及录入、编辑代码的基本方法了解VB程序设计的基本步骤二、实习内容实习熟悉VB集成开发环境各组成部分输入一个数，求该数的平方并显示结果第二章一、基本要求熟练掌握各种运算符的应用和优先顺序掌握各种常用函数的功能、参数和返回值掌握立即窗口的使用方法二、实验内容回答整形、长整型、单精度、双精度类型数据占用字节数。
已知直角三角形的两条直角边长，求斜边长。
Private Sub Command1_ClickDim a%, b%, c%a = Val)b = Val)c = SqrPrint cEnd Sub给小学生随机出两位数和一位数的加法题。
Private Sub Command1_ClickDim a%, b%, c%a = Val)b = Val)c = a + bPrint cEnd Sub用文本框输入一个带小数的数，对输入的数四舍五入保留2位小数。
Private Sub Command1_ClickDim x#, y!x = Text1.Texty = RoundPrint yEnd Sub输入某人姓名，判断是否你的本家。
Private Sub Command1_ClickDim a$, b$, p As Booleanb = "李"a = InputBoxIf Left = b Thenp = TrueEnd IfPrint pEnd Sub任意输入西安地区的固定电话号码，将其升为8位。
如原号码为029-*******，升位后为************。
Private Sub Command1_ClickDim x As String, y As Stringx = Text1.Texty = Left & & RightText2.Text = yEnd Sub输入书31页format语句，查看运行结果。
vb机试模拟试题(十五套)
附录2 Visual Basic上机模拟试题（1～10套）上机模拟试题 1一、调试程序（程序存盘文件名Test11.frm、Test11.vbp）（40分）在磁盘上有一名为“test11.vbp”的文件（程序界面如图1所示）。
其功能为：单击图片框后，则在图片框Picture1中输出如下所示的图形。
图1该程序中存在多处错误，请调试并改正之（注意：在程序调试过程中，不能删除整个语句，添加语句也不得超过2条。
）二、编程（程序存盘文件名Test12.frm、Test12.vbp）（60分）建立一个窗体，界面如图2所示。
程序功能要求如下：1、单击“查找”按钮后，查找所有四位数中满足条件“奇数位之和与偶数位之和均为素数”的数，并显示列表框list1中。
2、统计找到的满足条件的数的个数。
3、单击“存盘”按钮，将找到的数据存入数据文件“test12out.txt”中。
4、要求编写函数来判断是否是素数。
图2上机模拟试题2一、调试程序（程序存盘文件Test21.frm、Test21.vbp）（40分）在磁盘上有一名为“test21.vbp”的文件（程序界面如图1所示）。
其功能为：当在text1中输入行数和在text2中输入起始字母后，单击命令按钮command1，则在picture1中输出图形如图1所示。
要求：在text2中只能输入一个英文字母字符（大小写均可以），否则，提示错误信息，如图2所示。
图1 图2 该程序中存在多处错误，请调试并改正之（注意：在程序调试过程中，不能删除整个语句，添加语句也不得超过2条。
）二、编程（程序存盘文件名Test22.frm、Test22.vbp）（60分）建立一个成绩查询窗体，界面如图3所示。
程序功能要求如下：图31、在Form1_Load时，打开磁盘文件“test22in.txt”读取数据，并将读入的学号和姓名分别添加进两个列表框中，同时将三门课程的考试成绩读入c，d，e三个数组中（每个数组可定义为200个元素）；并默认选中第一名学生。
VB--2010考题---答案的__南医大(1)(1)
南方医科大学2009学年（春）季学期考试临床医学, 预防医学, 公共事业管理(医院管理), 经济学,《计算机二》试卷（A卷）一、A1型题(答题说明：单句型最佳选择题。
每一道考题下面均有五个备选答案。
在答题时，只需从中选择一个最合适的答案，并在显示器选择相应的答案或在答题卡上相应位置涂黑，以示正确回答。
每题1.5分，合计60分。
)1. Sub过程与Function过程最根本的区别是c 。
A. Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以B. Function过程可以有形参，Sub过程不可以C. Sub过程不能返回值，而Function过程能返回值D. 两种过程参数的传递方式不同2. 执行下面的语句后,所产生的信息框的标题是Ca=MsgBox（"AAAA",5,"BBBB"）A.AAAAB.5C.BBBBD.没有标题3. 下列符号中哪个是VB程序中合法的变量名 AA. ab7B. 7abC. IfD. a*bc4. 设置属性的语句格式为 AA. “对象名．属性名＝属性值”B. “对象名．属性名属性值”C. “窗体名．属性名＝属性值”D. “窗体名．属性名属性值”5. 若用户在键盘上按下一个键，则会产生一个____事件BA. clickB. KeyDownC. DbClickD. Load6. 在密码文本框中，要使从键盘上输入的字符在文本框上显示为“*”，则应用到文本框的______属性。
AA PasswordCharB CaptionC ValueD word7. 标准控件不包括（）控件。
DA. 驱动器列表框B. 目录列表框C. 文件列表框D. 通用对话框8. 下列叙述错误的是（）。
AA 不允许使用行号与标号B 单条语句可分行书写C 同一行上可以书写多条语句D VB代码不区分字母的大小写9. 下列叙述正确的是_____ BA 窗体的Name属性可以为空B 窗体的Name属性定义窗体的名称C 可以在运行期间改变窗体的Name属性D 窗体的Name属性的值显示在窗体标题栏中10. 下列叙述错误的是_____AA 标签和文本框都有Caption属性B 标签和文本框的主要区别在于能否编辑其内容C 标签具有AutoSize属性，而文本框没有D 文本框具有ScrollBar属性，而标签没有11. 能清除文本框Text1中内容的语句是____B _A Text = ""B Text1.Text = ""C Text1.clearD Text1.Cls12. 复选框的Value属性为0表示_____AA 复选框未被选中B 复选框被选中C 复选框内有灰色的钩D 操作出错13. 下列____语句设置单选按钮Option1为选中状态。
2010年春季计算机等级考试VB上机考试题
重庆市高等院校非计算机专业计算机等级考试Visual Basic 2010年第1次考试上机试卷第1套2010年4月24日一、设计下图所示界面的程序，程序运行后，输入球的半径，单击“球体积”、“球表面积”复选框，根据复选框是否勾选，决定是否在右侧相应的文本框内显示球体积（πR ）和球表面积（4πR ）的计算值。
（40分，存盘时工程文件名为Ex11nnnn.Vbp ，窗体文件名为Ex11nnnn.Frm ，其中nnnn 为考生准考证号的右4位）2433二、编写具有下图所示界面的应用程序，程序运行后，在“起始值”和“结束值”两个文本框中分别输入一个整数（大小不限），单击“计算累加和”按钮，就能在文本框下方的Label 控件中显示起始值与结束值之间所有奇数的累加和。
（30分，存盘时工程文件名为Ex12nnnn.Vbp ，窗体文件名为Ex12nnnn.Frm ，其中nnnn 为考生准考证号的右4位）三、程序的功能是：学生成绩数据已经保存在数组a 中，学生姓名已经保存在数组b 中，单击窗体，就能在窗体上显示成绩最好的学生姓名及其成绩。
（30分，要求根据程序代码改错，改错时，不得增加和删除语句。
将修改正确的程序存盘，工程文件名为Ex13nnnn.Vbp ，窗体文件名为Ex13nnnn.Frm ，其中nnnn 为考生准考证号的右4位）Private Sub Form_Click()Dim a As Variant, b As Stringa = Array(85, 77, 92, 66, 44)b = Array("黄玉梅", "朱明霞", "孙家宝", "赵天明", "杨百万")Max = a(0)：student = b(0)For i = 1 To 5If b(i) > Max ThenMax = a(i)：student = b(i)End IfNext iPrint "成绩最好的学生是："; student; "考试成绩为："; Max; "分" End Sub参考答案及评分标准：第一题参考代码Private Sub Check1_Click()r = Val(T ext1.Text)If Check1.Value = 1 Thenv = 4 * 3.14159 * r ^ 3 / 3Text2.Text = vElseText2.Text = ""End IfEnd SubPrivate Sub Check2_Click()r = Val(T ext1.Text)If Check2.Value = 1 Thenv = 4 * 3.14159 * r ^ 2Text3.Text = vElseText3.Text = ""End IfEnd Sub评分标准：界面设计15分保存文件5分每个事件过程10分第二题参考代码：Private Sub Command1_Click()X1 = Val(Text1.Text)X2 = Val(Text2.Text)Sum = 0If X1 < X2 Then n = 1 Else n = -1For i = X1 To X2 Step nIf i Mod 2 <> 0 ThenSum = Sum + iEnd IfNext iLabel3.Caption = "从" + Text1.Text + "到" + Text2.Text + "之间所有奇数的累加和＝" + Str(Sum)End Sub评分标准：界面设计5分循环结构正确5分（控制条件不正确者酌情扣分）判断条件正确5分求和正确5分输出格式正确5分正确存盘5分第三题改错参考答案：Private Sub Form_Click()Dim a As Variant, b As Varianta = Array(85, 77, 92, 66, 44)b = Array("黄玉梅", "朱明霞", "孙家宝", "赵天明", "杨百万")Max = a(0)student = b(0)For i = 1 To 4If a(i) > Max ThenMax = a(i)student = b(i)End IfNext iPrint "成绩最好的学生是："; student; "考试成绩为："; Max; "分" End Sub评分标准：共3处错误，每改一处错误正确存盘8分（共24分）6分重庆市高等院校非计算机专业计算机等级考试Visual Basic 2010年第1次考试上机试卷第2套2010年4月24日1．设计右图所示界面的程序，程序运行后，输入圆的半径，单击“圆面积”、“圆周长”复选框，然后单击“计算”按钮，根据复选框是否勾选，决定是否在右侧相应的文本框内显示圆面积和圆周长的计算值。
全国计算机VB上机题库及答案(全)
全国计算机等级考试二级VB上机考试新版题库及解析【2013年3月考试专用】考前复习必看资料：PiaoMo整理—1—第一套上机题题干166一、基本操作题请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为Command1的命令按钮数组，含三个命令按钮，它们的Index 属性分别为0、1、2，标题依次为"是"、"否"、"取消"，每个按钮的高、宽均为300、800。
窗体的标题为"按钮窗口"。
运行后的窗体如图1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp ，窗体文件名为sjt1.frm 。
图1【操作步骤】步骤1：新建一个"标准EXE"工程，如表1在窗体中用"复制"和"粘贴"画出控件数组并设置属性。
表1(2)在名称为Form1的窗体上画一个名称为Sha1的形状控件，然后建立一个菜单，标题为"形状"，名称为shape0，该菜单有两个子菜单，其标题分别为"正方形"和"圆形"，其名称分别为shape1和shape2，如图2所示，然后编写适当的程序。
程序运行后，如果选择"正方形"菜单项，则形状控件显示为正方形；如果选择"圆形"菜单项，则窗体上的形状控件显示为圆形。
注意：程序中不能使用变量，每个事件过程中只能写一条语句。
保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp ，窗体文件名为sjt2.frm 。
图2【操作步骤】步骤1：新建一个"标准EXE"工程，在窗体Form1中画一个名为Sha1的形状控件。
步骤2：选择【工具】→【菜单编辑器】命令，打开菜单设计器，如表2中的设置建立菜单项。
VB期末上机考试题
1、编制通用函数sum过程，计算1+2+……+N 的值。
在窗体的Click事件中调用该函数。
2、编制通用函数fact过程，计算N！的值。
在窗体的Click事件中调用该函数。
3、编制一个判断奇偶数的函数过程（Odd）。
在窗体的Click事件中调用该函数，输入一个整数，判断其奇偶性。
4、新建一个工程，完成应用程序的设计，具体要求如下：（1）按照下图所示在窗体上放置按钮和控件。
（2）取消窗体的最大化和最小化按钮。
（3）当单击命令按钮时，实现窗口放大功能，放大后再单击该按钮则还原窗口。
（4）同时可使用热键Alt+L和Alt+B实现窗口放大或还原。
（5）当窗体大小改变后，总是让命令按钮位于窗口的中央。
5、新建一个工程，完成“密码检验”程序的设计。
具体要求如下：（1）参照运行界面完成界面设计。
（2）文本框Text1，用于输入密码。
文本框中输入的字符显示为*，并且最多可以接受7个字符。
（3）窗体的下半部有一个标签控件Label2，用来显示密码输入后的提示信息。
（4）当在文本框中输入密码“1234567”，并按回车后，标签Label2显示为“欢迎光临！”；如果输入的密码与“1234567”不吻合，标签Label2显示为“密码不符，请再输入一遍！”，同时清空文本框的内容，允许再输入一遍；如果第二次输入的密码仍然与“1234567”不吻合，标签Label2显示为“非法用户，请退出程序！”，文本框就不能使用了。
6、新建一个工程，完成“格式设置”程序。
如图。
7、新建一个工程，完成“点餐”程序的设计。
具体要求如下：（1）窗体中有以下控件：一个框架控件作为容器，内有三个复选框数组、对应三个文本框数组、三个标签框、一个命令按钮。
（2）要求文本框只有选取了相应的套餐后才可以进行输入；如果没有选取大套餐，那么文本框不能编辑。
（3）完成以下功能：选择所需套餐种类及份数，单击确定按钮后计算所需的钱，并用消息框显示。
8、“列表框添加内容”程序（1）参照运行时界面完成界面设计。
2010VB本科期末上机考试练习题答案
1、单击窗体在窗体上输出10个两位随机整数，并求出其平均数。
运行效果如下图所示：Private Sub Form_Click()Dim a(10) As Integer, i As Integer, s As IntegerFor i = 1 To 10a(i) = Int(Rnd * (99 - 10 + 1)) + 10s = s + a(i)Print a(i)Next iPrint "平均数为" & s / 10End Sub2、随机产生20个200～400之间的随机整数，按每行5个输出到窗体上，并求出其中的最大值。
Private Sub Form_Click()Dim i As Integer, a(20) As Integer, max As IntegerPrint "原始数据为："max = 0For i = 1 To 20a(i) = Int(Rnd * (400 - 200 + 1)) + 200Print a(i);If i Mod 5 = 0 Then PrintIf max < a(i) Then max = a(i)Next iPrint "最大值为：" & maxEnd Sub3、产生20个两位的随机整数，输出这20个数（以每行5个的形式输出这20个数，其中的偶数用红色显示），找出其中的最大值和最小值，计算并输出平均值。
运行效果如下图所示：Private Sub Form_Click()Dim a(20) As Integer, i As Integer, max As Integer, min As Integer, s As IntegerPrint "原数组为："max = 0min = 100Form1.ForeColor = vbBlackFor i = 1 To 20a(i) = Int(Rnd * (99 - 10 + 1)) + 10If a(i) Mod 2 = 0 ThenForm1.ForeColor = vbRedElseForm1.ForeColor = vbBlackEnd IfPrint a(i); 先变色，再输出If i Mod 5 = 0 Then Prints = s + a(i)If max < a(i) Then max = a(i)If min > a(i) Then min = a(i)Next iPrintForm1.ForeColor = vbBlackPrint "max=" & maxPrint "min=" & minPrint "aver=" & s / 20End Sub4、产生10个随机两位正整数，放入一数组中，并按从小到大的顺序排列。
vb上机练习试题及答案
第一章概述一、基本要求（1）熟悉VB集成开发环境（2）掌握代码窗口的应用及录入、编辑代码的基本方法（3）了解VB程序设计的基本步骤二、实习内容（1）实习熟悉VB集成开发环境各组成部分（2）输入一个数，求该数的平方并显示结果第二章一、基本要求（1）熟练掌握各种运算符的应用和优先顺序（2）掌握各种常用函数的功能、参数和返回值（3）掌握立即窗口的使用方法二、实验内容（1）回答整形、长整型、单精度、双精度类型数据占用字节数。
（2）已知直角三角形的两条直角边长，求斜边长。
Privat e Sub Comman d1_Cl ick()Dim a%, b%, c%a = Val(InputB ox("输入第一条直角边长"))b = Val(InputB ox("输入第二条直角边长"))c = Sqr(a ^ 2 + b ^ 2)PrintcEnd Sub（3）给小学生随机出两位数和一位数的加法题。
Privat e Sub Comman d1_Cl ick()Dim a%, b%, c%a = Val(InputB ox("输入两位数"))b = Val(InputB ox("输入一位数"))c = a + bPrintcEnd Sub（4）用文本框输入一个带小数的数，对输入的数四舍五入保留2位小数。
Privat e Sub Comman d1_Cl ick()Dim x#, y!x = Text1.Texty = Round(x, 2)PrintyEnd Sub（5）输入某人姓名，判断是否你的本家。
Privat e Sub Comman d1_Cl ick()Dim a$, b$, p As Boolea nb = "李"a = InputB ox("输入某人的姓名")If Left(a, 1) = b Thenp = TrueEnd IfPrintpEnd Sub（6）任意输入西安地区的固定电话号码（原为7位），将其升为8位（在原号码前面加8）。
2010VB上机实验
2009-2010学年春季学期Visual Basic程序设计上机实验目录实验一：VB集成环境及简单应用程序的建立 (1)实验二：顺序结构程序设计 (5)实验三：选择结构程序设计 (7)实验四：循环结构程序设计 (11)实验五：常用内部控件的程序设计 (12)实验六：数组的使用 (18)实验七：过程的创建和使用 (23)实验一：VB集成环境及简单应用程序的建立(一)实验目的：熟悉VB集成开发环境的使用；掌握VB应用程序设计思想，能完成简单的程序设计。
(二)实验要求：在自己的机器上新建一个文件夹，名称为自己的学号。
按照要求完成各题，保存时必须保存在自己的文件夹中。
(三)同学们上机容易出现的问题：1.一道题建立一个工程，做一道题时启动VB，做完后保存，关闭VB。
2.写程序代码时，符号要用英文输入法输入。
例如字符串的定界符引号：form1.caption="程序举例"3.写代码时，一定注意对象的名称是否正确，例如打入label1. 后，如果没有VB自动提示，肯定是名称写错了，检查修改。
为避免麻烦，可以把标签等对象名重新命名，例如命名成简单的a。
修改name名称属性。
4.保存：点击保存按钮，或文件→保存工程。
生成可执行程序：文件→生成.exe(四)实验内容：1.独立完成例1-3-1，保存时窗体文件名为1.frm，工程文件名为1.vbp，生成可执行程序文件名为1.exe。
(教材P7)2.独立完成例1-4-1，保存时窗体文件名为 2.frm，工程文件名为2.vbp，生成可执行程序文件名为2.exe。
(教材P23)3.独立完成例1-4-2，保存时窗体文件名为 3.frm，工程文件名为3.vbp，生成可执行程序文件名为3.exe。
(教材P26)4.第1章课后作业第6题，保存时窗体文件名为4.frm，工程文件名为4.vbp，生成可执行程序文件名为4.exe。
(教材P28)5.第1章课后作业第7题，保存时窗体文件名为5.frm，工程文件名为5.vbp，生成可执行程序文件名为5.exe。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
2011-2012学年第1学期2010级经济学专业上机实习任务
主题：VB综合编程
时间：第10~13周
〖实习要求〗
1.实习时间16学时，请同学们复习所学VB和数据库的知识，查阅资料独立完成。
2.实习题目中的所有题目要求在一个工程中完成，设计一个窗体作为主界面（如图），通
过主界面运行每一题。
3.实习报告要求
①实习报告内容
A．源代码
B．界面设计
C．调试分析
D．测试结果
E．实验心得、体会和建议
②实习报告格式
实习报告统一采用A4幅面的纸张打印装订。
封面必须包含以下信息：
③实习报告上交时间
以班为单位由学习委员于第15周一下午交到实验室办公室（留学生楼3楼），其它时间或其它方式一概不收。
〖实习成绩计算〗
1.考勤：20％（三次不到取消资格）
2.程序实现：50％（绝大部分的功能实现占80%,界面占20%）
3.实习报告：30％（请按要求的实习报告格式书写，不按格式要求书写将被扣分）
〖实习题目〗
一、基础题
1.编程实现在包含10个元素的一维数组中寻找前n（n<=10）个元素中的最大数及位置，
在文本框中显示出来。
2.求出10000以内的所有完数，并显示在窗体上。
所谓完数，是指一个数恰好等于它的
所有因子之和，例如：6的所有因子为1,2,3,而6=1+2+3,所以6是完数。
3.随机生成10个20到50范围内的正整数，显示它们的最大值和平均值。
4.设计程序，求出S=（1+1）+（1+2）+（1+2+3）+。
（1+2+3+4。
+N）的值
5.程序启动运行时，显示画面如图1；单击“开始”按钮Command1之后，在窗体上显
示一个矩形，矩形那的填充颜色按每秒1次的速度随机变化，如图2所示；单击窗体，恢复到图1。
（40分，存盘时工程文件名为Ex11nnnn.Vbp。
窗体文件名为Ex11nnnn.Frm，其中nnnn为学号的右4位）
图1 图2
6.程序启动运行时，显示画面如图1：单击“开始”按钮Command1之后，在标签Label1
中显示当前时间性，并按每秒1次的速度随机变化文字颜色，如图2所示：单击窗体，（40分，存盘时工程文件名为Ex21nnnn.Vbp，窗体文件保为Ex21nnnn,Frm，恢复到图1。
其中nnnn为学号的右4位）
图1 图2
7.编写下图所示的四则运算程序，输入第一个数和第二个数之后，单击图中任意一个单
选按钮，就能按单选按钮的指示完成计算，并在“计算结果”文本框中输出结果（当第二个数为0,并且选择除法运算时，则在“计算结果”文本框中显示“除数为0,计算无效”）。
（40分，存盘时工程文件名为Ex11.vbp,窗体文件名为Ex11.frm）。
8.设计程序界面如图所示，程序运行时，单击“生成矩阵”按钮Command1，在图片框
picture1中生成2位正整数的5×7矩阵；随后单击“查找最小值”按钮command2，在图片框picture2中生成矩阵的最小值。
二、简单应用题
1.某应用的运行窗口如下：
当用户单击“开始”按钮后，文本框中就会显示计数值的变化（每隔0.3秒增加1）；当单击“暂停”按钮时，文本框中的计数就会停止；当单击“清除”按钮时，文本框中的计数值就会清0。
2.在窗体有三个复选框，名称分别为Ch1、Ch2和Ch3，标题依次为"体育"、"音乐"、"
美术"，还有一个命令按钮，名称为C1，标题为"显示"。
要求程序运行后，如果选中
某个复选框，则当单击"显示"命令按钮时，则显示相应的信息。
例如，如果选取中"体育"和"音乐"复选框，则单击"显示"命令按钮后，在窗体上显示"我的爱好是体育音乐"；
而如果选中"体育"、"音乐"和"美术"复选框，则单击"显示"按钮后，在窗体上显示"我的爱好是体育音乐美术"。
3.在窗体上建立一个名称为Text1的文本框和一个名称为Cmd1，标题为"计算"的命令按
钮。
程序运行后，单击"计算"命令按钮，通过在对话框输入整数12，放入整形变量a 中，然后计算a!，（提示：运算结果应放入double型变量中）
4.在窗口中有两个名称分别为COMSTART，COMEXIT，标题分别为"开始"、"退出"的
命令按钮。
要求程序运行后，单击"开始"按钮后，能在窗体中打印出如下图所示的三角形，执行完毕"开始"按钮,变成"完成"，且无效（变灰）。
A
AAA
AAAAA
AAAAAAA
BBBBBBB
BBBBB
BBB
B
5.模拟打字机过程。
单击窗体，程序按每秒2个字符的速度，逐个地将“2010级上机实
习”显示在标签Label1中。
当所有字符全部显示以后，将其清除，重复以上过程。
（注：所有控件的属性都必须在程序代码中设置，打字速度由定时器控制）
6.在窗体中左右两边各放置一个列表框ListBox的控件List1和List2，在List1中竖排显
示内容“第一题、第二题、第三题、第四题、第五题”这五项。
在两个列表框中间竖排四个命令按钮，标题分别为“＜”、“＞”、“＜＜”、“＞＞”。
界面如下图所示，实现程序功能：1）点击“＜”将List1中所选中的项添加到List2中，并将List1中的项删除。
2）点击“＞”将List2中所选中的项添加到List1中，并将List2中的项删除。
3）点击“＜＜”将Lixt1中所有的选项添加到List2中，并将List1中的项清空。
4）点击“＞＞”将List2中所有的选项添加到List1中，并将List2中的项清空。
三、综合应用题
1.设计一个“简单通讯录”程序，用Access数据库存储数据，数据库中包含两张表，人员
基本信息表：人员编号、姓名、部门、住宅电话、移动电话、工作单位地址、家庭地址等；部门信息表：部门编号、部门名称；两张表的关系如图1-1,
图1-1
程序界面可参考图1-2，也可自行设计，编程实现以下基本功能：从数据库中取得部门信息填入下拉列表框中，当用户在下拉列表框中选择某一部门后，将该部门所属人员加入下面的列表框中，从列表框中选中一个人员后，将其基本信息显示在下面的各文本框中，其显示的基本信息由选项中的复选框是否选中来决定。
例如，当用户选择或者取消“住宅电话”复选框后，将显示或隐藏“住宅电话”文本框和标签。
图1-2。