基本操作题，请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)

　　1、(1)在窗体Form1中绘制一个名称为Text1、内容空的文本框和一个名称为Command1、标题为“大写”的命令按钮。要求程序运行时，在文本框中输入英文字母，单击“大写”，文本框中的字母全部以大写字母显示。程序代码中不得使用任何变量。程序运行的效果如图53-1所示。

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。

　　(2)在名为Form1的窗体上绘制一个容器，名称为Frame1，标题为“框架”、高度为2400、宽度为2000;再在容器中绘制一个标签，名称为Label1、高度为500、宽度为1200，其位置距容器的左边框300，距容器的上边框800，标签中的初始内容设置为“模拟试题”，BorderStyle属性为2。只建立控件，不必定义其事件过程。程序运行时的窗体界面如图53-2所示。

　　

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。

　　2、(1)在名称为Form1的窗体上建立一个名称为Command1、标题为"输出"的命令按钮，再建立一个名称为Text1的文本框，字体为四号、常规、黑体，编写适当的事件过程，要求程序运行后，如果单击"输出"命令按钮，则在文本框上显示"模拟考试"，如图11-1所示。程序中不能使用任何变量，直接显示字符串。

　　

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。

　　(2)在名称为Form1的窗体上画一个标签，名称为Label1，边框属性为1;再画一个命令按钮，名称为Command1，标题为"最右端"，运行界面如图11-2所示。请编写适当的事件过程，使运行界面在运行时，单击"最右端"按钮，则标签水平移动到窗体的最右端。程序中不得使用任何变量。

　　

　　注意：存盘时必须存放在考生文件夹下，工程文件名为sj2.vbp，窗体文件名为sj2.frm。

　　3、(1)在名称为Form1的窗体上画一个空白文本框，名称为Text1，它的高为2000，宽为2000。通过属性窗口设置适当的属性使得Text1可以显示多行文本，且有垂直滚动条。程序运行时的窗体如图32-1所示。

　　

　　注意：存盘时必须存放在考生文件夹下，工程文件名为sj1.vbp，窗体文件名为sj1.frm。

　　(2)在名称为Form1的窗体上画一个图像框，名称为Image1，其高、宽分别为800、800，通过属性窗口把考生文件夹下的图像文件test.bmp装入图像框;再画一个命令按钮，名称为Command1，标题为“变宽”。请编写适当的事件过程，要求程序运行后，每单击一次“变宽”按钮，则使图像的宽度增加600。程序运行时窗体界面如图32-2所示。

　　

　　注意：存盘时必须存放在考生文件夹下，工程文件名为sj2.vbp，窗体的文件名为sj2.frm。

　　4、(1)在窗体Form1上画一个命令按钮，名称为Command1，标题为“打开文件”，在窗体上添加适当的控件并编写适当的程序代码，要求程序运行时，单击“打开文件”命令按钮，可以弹出“打开文件”对话框。程序运行时的窗体界面如图65-1所示。

　　

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。

　　(2)在窗体Form1上画一个列表框，名称为List1，有“Item1”、“Item2”、“Item3”和“Item4”4个表项。要求编写适当的程序代码，当双击列表中某一项时，弹出一个对话框提示“是否删除”。对话框中只有“是”与“否”两个选择按钮，单击按钮，则继续当前的操作。程序运行时的窗体界面如图65-2所示。

　　

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。

　　5、请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。

　　(1)在名称为Form1的窗体上放置一个名称为Drive1的驱动列表框控件、一个名称为Dir1的目录列表框控件和一个名称为File1的文件列表框控件。程序运行时，可以对系统中的文件进行浏览，如图70-1所示。

　　

　　注意：程序中不得使用任何变量;保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。

　　(2)在名称为Form1的窗体上放置一个名为Label1的标签控件和一个名为Timer1的计时器控件，程序运行后，文本框中显示的是当前的时间，而且每一秒文本框中所显示的时间都会随时间的变化而改变，并且显示的字体为四号宋体字，如图70-2所示。

　　

　　注意：程序中不得使用任何变量;保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。

　　简单应用题

　　6、(1)在考生文件夹下有一个工程文件sj3.vbp，相应的窗体文件为sj3.frm。其功能是在Text1文本框中输入一个数N，单击命令按钮计算从0到N的所有素数的和，并在Text2中显示出来。运行程序如图67-3所示。

　　

　　注意：去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

　　(2)在考生文件夹下有工程文件Sj4.vbp及窗体文件sj4.frm，该程序是不完整的。本程序的功能为当用户单击窗体上的命令按钮“输入”时，可以输入6个数值，随后程序对这6个数值进行升序排序，单击按钮“输出”则把大于平均值的数显示出来，程序运行时的窗体如图67-4所示。

　　

　　注意：请在有“?”号的地方填入正确内容，然后删除“?”及代码前的所有注释符“'”，但不能修改其他部分。存盘时不得改变文件名和文件夹。

　　7、(1)在窗体上画两个单选按钮，名称分别为Op1和Op2，标题分别为“黑体”和“楷体”;一个文本框，名称为Text1，字体为宋体，字号为四号字;有一个命令按钮，名称为C1，标题为“切换”。要求程序运行后，在文本框中输入“等级考试”，并选择一个单选按钮，如图55-4所示。在单击“切换”按钮后，会根据所选的单选按钮来切换文本框中所显示的汉字字体，如图55-5所示。

　　

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj3.frm，工程文件名为sj3.vbp。

　　(2)在考生文件夹中有一个工程文件sj4.vbp，相应的窗体文件名为sj4.frm。请在名为Form1的窗体上绘制一个名称为Text1的文本框和一个名称为Cmd1、标题为“大小写转换”的命令按钮，如图55-6，55-7所示。

　　如图55-6，55-7所示，在程序运行时，单击“大小写转换”按钮，可以把Text1中的大写字母转换为小写，把小写字母转换为大写。窗体文件中已经给出了“大小写转换”按钮的Click事件过程，但不完整，请去掉程序中的注释符“”’，把程序中的问号“?”改为正确的内容。

　　

　　注意：不能修改程序的其他部分。最后，按原文件名并在原文件夹中保存修改后的文件。

　　8、(1)在名为Form1的窗体上建立两个主菜单，其标题分别为"文件"和"帮助"，名称分别为vbFile和vbHelp，在"文件"菜单下有3个菜单项，分别为"新建"、"打开"和"保存"(其名称分别为vbNew、vbOpen和vbSave)。要求程序运行后，如果选中"文件"下的某个菜单项，则将该菜单项的标题通过MsgBox对话框显示出来，如图50-3所示。

　　

　　注意：文件必须存放在考生文件夹中，窗体文件名为sj3.frm，工程文件名为sj3.vbp。

　　(2)在名为Form1的窗体上建立一个文本框，名为Text1;再建立一个命令按钮，名为Cmd1，标题为"计算"，如图50-4所示。

　　要求程序运行后，单击命令按钮，则计算出100～200所有素数之和，并在文本框中显示结果，同时把结果存入文件out48.txt中(在考生文件夹中有标准模块mode.bas，其中的PutData过程可以把结果存入文件;而isprime函数可以判断整数X是否为素数，如果是素数，则函数返回True，否则返回False;考生可以把该模块文件添加到自己的工程中)。

　　

　　注意：文件必须存放在考生文件夹中，窗体文件名为sj4.frm，工程文件名为sj4.vbp。

　　9、(1)在考生文件夹下有工程文件sj3.vbp与窗体文件sj3.frm，该程序和窗体是不完整的。请在窗体上设置一个标签，名称为Labe11，标题为"计算1/2一1/3+1/4一1/5+1/6的值";另设一个文本框与一个命令按钮。命令按钮的名称为Command1、标题为"计算";文本框的名称为Text1，用于显示结果，并初始化为空。然后编写相应的代码，要求运行程序时，单击"计算"按钮，程序可以计算出1/2一1/3+1/4一1/5+1/6的值，并将结果显示在文本框中，如图46-3所示。

　　

　　注意：考生完成程序编写后，将工程文件与窗体文件按原文件名保存到考生文件夹下，不得更改程序的其他部分，否则可能无成绩。

　　(2)新建一个工程文件，在名称为Form1的窗体上建立两个名称分别为Command1和Command2、标题分别为"平均分"和"清空"的命令按钮;一个名为Text1的文本框。要求程序运行后，单击"平均分"按钮，可通过输入对话框输入7个整数，去掉最大的和最小的然后求平均分，将结果在文本框中显示出来。如果单击"清空"按钮，则将文本框清空。在程序中不得使用任何其他变量。程序运行时的窗体界面如图46-4所示。

　　

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj4.frm，工程文件名为sj4.vbp。

　　10、(1)在窗体上设置两个标签，名称分别为Label1与Label2、标题分别为"当前时间为："和空;要求当单击窗体时，Label2显示当前时间。请编写相应的程序代码来完成这个功能。程序运行时的窗体界面如图41-3所示。

　　

　　注意：要求考生在编写完程序后，把工程文件与窗体文件保存到考生文件夹下，文件名分别为sj3.vbp与sj3.frm。

　　(2)在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm，该程序是不完整的。本程序的功能是利用随机数函数模拟投币，方法是：每次随机产生一个0或1的整数，相当于一次投币，1代表正面，0代表反面。在窗体上画3个名称分别为Text1、Text2和Text3的文本框与一个名称为Command1的命令按钮，其中Command1的标题为"开始"。文本框分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数。程序运行后，在文本框Text1中输入总次数，然后单击"开始"按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。如图41-4所示。

　　

　　注意：请在有"?"的地方填入正确内容，然后删除"?"及代码前的所有注释符"'"，但不能修改其他部分。存盘时不得改变文件名和文件夹。

　　综合操作题

　　11、在考生文件夹中有工程文件sj5.vbp及其窗体文件sj5.frm，该程序是不完整的。在名称为Form1的窗体上有两个命令按钮，名称分别为Command1和Command2、标题分别为"读取数据"和"保存"，一个文本框，名称为Text1、MultiLine属性为True、ScrollBars属性为2;要求如果单击"读取数据"按钮，则读入in.txt文件中的50个整数，放人一个数组中，同时在文本框中显示出来;如果单击"保存"按钮，则计算数组中小于300或大于或等于800的所有数之和，把求和结果在文本框Text1中显示出来，如图12-5所示。同时把结果存人考生文件夹中的文件out.txt中。(在mode.has中的WriteData过程可以把结果存入out.txt文件)

　　

　　注意：请在有"?"的地方填入正确内容，然后删除"?"及代码前的所有注释符"'"但不能修改其他部分。存盘时不得改变文件名和文件夹。文件必须存放在考生文件夹下，窗体文件名为sj5.frm，工程文件名为sj5.vbp，计算结果存入out.txt文件中，否则没有成绩。

　　12、在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm，该程序是不完整的。在名称为Form1的窗体上有3个Label控件和2个命令按钮，命令按钮的名称为Command1与Command2，标题为"读取"与"保存并退出"。考生文件夹下的数据文件in5.txt存放一些字符。要求程序运行时，按"读取"按钮后，从考生文件夹下的in5.txt中读出数据并识别出其中的非字母元素，按"保存并退出"按钮后，将非字母元素写入考生文件夹下的out5.txt文件中(以标准格式在一行中输出);执行完毕，"读取"按钮变成"完成"，且无效(变灰)，单击"保存并退出"按钮，程序结束，如图49-5所示。

　　

　　注意：请将程序代码补充完整，但不能修改其他部分。存盘时不得改变文件名和文件夹，相应的txt文件也保存到考生文件夹下，否则没有成绩。

　　13、在考生目录下有一个工程文件sj5.vbp，其窗体上有两个标签L1和L2，标题分别为"口令"和"允许次数";一个命令按钮C1，标题为"确定";两个文本框，名称分别为Text1和Text2。其中Text1用来输入口令(输入时，文本框内容显示"*")，初始内容为空;Text2的初始内容为3。并给出了C1的事件过程，但不完整，要求去掉程序中的注释符"'"，把程序中的"?"改为正确的内容，使得程序运行时，在Text1中输人口令后，单击"确定"，如果输入的是"123456"则在Text1中显示"口令正确";如果输入其他内容，单击"确定"后，弹出错误提示对话框(如图8-6所示)，并且Text2中的数字减1。最多可输入3次口令，若3次都输入错误，则禁止再次输入。

　　

　　注意：不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。

　　14、在考生文件夹下有一个工程文件sj5.vbp，窗体上有一个文本框，名称为Text1，可以多行显示。还有三个命令按钮，名称分别为Command1、Command2和Command3，标题分别为“读取数据”、“显示并保存奇数”和“显示并保存偶数”。“读取数据”按钮的功能是把考生文件夹下的in5.dat文件中的50个整数读到数组中，并在Text1中显示出来;“显示并保存奇数”和“显示并保存偶数”按钮的功能是把50个数按要求保存到考生文件夹下的out51.dat和out52.dat文件中。单击“读取数据”命令按钮后，程序运行时的窗体界面如图52-5所示。

　　

　　注意：在窗体中已经给出了全部控件和部分程序，要求阅读程序并去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件按原文件名存盘。

　　15、在考生文件夹下有一个工程文件sj5.vbp，程序代码中已经写入部分代码，要求根据下面的描述在窗体模块中定义3个名称分别为readdata1、readdata2和WriteData的Sub过程。请先装入工程文件sj5.vbp，然后完成以下操作：在名称为Form1的窗体上画3个命令的按钮，其名称为Command1、Command2和Command3，标题分别为"读取数据"、"计算"和"存盘"。程序运行后，如果单击"读取数据"按钮，则读人in1.txt和in2.txt文件中的各25个整数，分别放人a1和a2两个数组中：如果单击"计算"按钮，则把两个数组中对应下标的元素相加，其结果放人第3个数组中(即：第一个数组的第n个元素加上第2个数组的第n个元素，其结果作为第3个数组的第12个元素。这里的n为1，2….，25)，然后计算第3个数组各元素之和，并把所求得的和在窗体上显示出来;如果单击"存盘"按钮，则把所求得的和存人考生文件夹的out5.txt文件中。程序运行时的窗体界面如图47-5所示。

　　

　　注意：考生只需添加必要的控件，并将程序代码补充完整，使其实现上述功能即可。考生不得修改窗体文件中已经存在的程序，必须把求得的结果用"存盘"按钮存入考生文件文件夹下的out5.txt文件中，否则没有成绩。存盘时，工程文件名仍为sj5.vbp，窗体文件名仍为sj5.frm。