答案都在“exam”文件夹中，每个题的题号与文件夹里的序号一一对应！
1.单击command1按钮，将考生目录下的文本文件old.txt复制到新文件new.
txt中，并利用文件操作语句
将old.txt文件从目录中删除。
2、建立文件名为“dat1.txt”的顺序文件，它的内容来自文本框（t1），每按
一次Enter键写入一条数据，然后清除文本框的内容，使文本框获取焦点，直到文本框内输入“END”字符串结束。
说明：在窗体的load()事件中打开文件“\t1.txt”
3.设计一个画板程序，程序运行后可以根据选择的线型的粗细、颜色，用鼠标的左键模拟笔在窗体上随意绘图，用鼠标的右键可擦除所绘制的线条。首先在窗体上建立一个图片框，并将其设置为窗体大小，白色背景。利用菜单编辑器在该窗体上编辑菜单程序，具体要求如下：
(1) 包含三个主菜单："颜色"、"线型"、"清除"。"线型"包括两个菜单命令："粗（10磅）"和"细（5磅）"。
(2) "颜色"命令打开颜色对话框，实现对绘图笔颜色的设置。"清除"命令实现清除图片框中的图形。
(3)"粗(10磅)"设置图片框的DrawWidth属性为10磅，"细(5磅) " 设置图片框的DrawWidth属性为5磅。
4.编写程序求：1!+2!+3!+...+n!，要求计算阶乘用函数过程(起名为fact)，其中第一个文本框名称为用户输入阶乘数n，第二
个文本框为显示计算结果，按钮控件单击触发事件求取计算结果。
5.设计如图所示界面，列表框中存放单词，按字母顺序排列，要求实现以下功能：（1）在窗口左下角的文本框内输入单词，单击"添加单词"按钮，若该单词不在列表框内，则将该单词添加到列表框中，否则不添加。（2）在窗口左下角的文本框内输入单词，单击"查找单词"按钮，在列表框中查找该单词，若找到，则反显该单词，若找不到，单词表中没有反显单词。（3）在列表框中选中一个单词，单击"删除单词"按钮，将删除的单词写入
文本框，然后从列表框中删除该单词。窗体中的控件都用默认名称。
6.在如图所示的界面中，通过单击列表框设置标签中文字的字体，用水平滚动条设置标签中文字的字号，利用单选按钮设置标签中文字样式。要求：
（1）用代码给列表框添加字体名称。
（2）选择某一个文字样式效果后，其他三种样式效果取消设置。
7.形成5*5的方阵，在窗体点击事件(Form_Click)使文本框中输出方阵中的上三角元素,换行统一使用关键字"vbCrLf",如图所示，并在窗体加载时把文本框背景色设置为豆绿色"&HFFFFC0 "。
8.编写程序，单击command1命令按钮，把书名文本框Text1和书价文本框Text2的内容写入顺序文件BookInfo.txt中,同时写入文件之前要求Text2只能输入数字,若输入非数字请用MsgB ox提示并退出程序。
9.编一循环程序，当用户在窗体上单击鼠标时，用Line方法或Line控件对象在屏幕上随机产生20条长度、颜色、宽度各异的直线段。
10.在当前工程目录下建立test1.txt和test2.txt两个顺序文件，test1.txt和test2.txt的内容分别来自Text1和Text2，每按“写入”按钮写入一次，按“合并”按钮将test1.txt和t est2.txt的内容合并到test2.txt中，然后读取test2.txt的内容显示在Text3中，按“清空”按钮清空Text1、Text2和Te xt3中的内容。
11.在输入对话框中输入10个数值数据存入数组a，将其中的整数放入数组b，然后运用选择法将数组b中的数据按降序排序，并将数组b以每行5个数据在窗体上输出。请打开相应的工程文件，打开代码窗口将程序补充完整。
12.编程计算以下分段函数值：要求x的值由inputbox函数输入。
13.使用文件系统控件设计一个简单的图片浏览器(只查看jpg 与bmp格式文件)，运行界面如图所示。
14.求e^x的值，通过输入框(InputBox)获取x的值，在窗体点击事件(Form_Click)里编写程序，并将结果打印在窗体上。
15.单击窗体form1，生成10个的随机数的数组A，编写一个函数Total从数组中取每个元素第K位数之和，并在窗体单击事件中将结果存入对应的文本框中。
函数名：function Total(B%(),K%) as integer
当K=1时，取个位数
当K=2时，取十位数
当K=3时，取百位数
16.在窗体上放置一个图片框控件并命名为Pic1、一个命令按钮“画图”并命名为Com1，单击“画图”按钮，重新定义图形框的坐标系为(-4,4) - (4,-4)。用Pset方法在图片框内绘制参数方程
x=r*cos(4A)cos(A); y=r*cos(4A)sin(A)
A在0--2π之间间隔为0.005的图形，其中r为半径，取图形框坐标系宽度的一半。界面及结果如下图所示：
17.在窗体上建立4个命令按钮Command1、Command2、Comman d3、Command4，一个标签Label1和一个计时器控件Timer1，将这些控件作适当布置。编程完成如下要求。
(1)程序运行后，4个命令按钮分别显示"放大"、"加粗"、"红色"、"上升"，标签文字显示"VB考试之编程"。
(2)Timer1的相关属性要求在代码中设置，不要设计模式下在属性窗口设置。
(3)单击"放大"按钮，标签显示的文字放大3倍；单击"加粗"按钮，标签显示的文字加粗；单击"红色"按钮则标签显示的文字为
红色；单击"上升"按钮标签向上移动，移出窗体后再从窗体底部出现，继续上移。
18.下面子过程是求，当最后一项的绝对值小于0.00001时结束，主调程序求调用自定义函数过程e 3，在Text1显示结果；调用标准函数Exp(3），验证结果，效果见图.请编写函数过程。
19、在文本框中输入一个不大于10的正整数，单击按钮判断该数是奇数还是偶数，判断结果显示在Label2中，如果是奇数，求出该数的阶乘。要求：
（1）如果输入的数据不符合要求，要用消息框给处提示。
（2）求阶乘的功能要求用函数过程实现，函数名为jiecheng
20.请完成form1中的各项菜单子项的编制程序，控制Label1中文字的字型和字号。