二、简单应用题
(1)在考生文件夹中有工程文件vbsj3.vbp及窗体文件vbsj3.frm。在名为Form1的窗体 上有一个名为Lab1的标签数组,该数组有4个控件元素,它们的标题分别是Wait、Edit、 Aix和Move,如图56-3所示。
在程序运行后,将鼠标指针移动到各控件元素上,则鼠标指针的形状将变成各控件元 素的标题所代表的鼠标指针形状;离开控件元素,则鼠标指针又变成正常情况下的箭头形 状。本程序不完整,请补充完整,并能正确运行。
要求:去掉程序中的注释符“’”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。
(2)在考生文件夹中有一个工程文件 vbsj4.vbp 及其窗体文件 vbsj4.frm。请在名为 Form1 的窗体上绘制两个名称分别为 Txt1 和 Txt2 的文本框,文本框的内容分别设置为“计 算机考试”、“Visual Basic”;然后绘制一个名称为 Labl 的标签,其高度为 300,宽度为 2500; 再绘制两个名称分别为 Opt1 和 Opt2 的单选按钮,它们的标题分别为“交换”和“连接”; 最后再绘制一个名称为 Cmd1 的命令按钮,其标题为“确定”。
编写适当的事件程序。使得程序运行后,如果选中“交换”单选按钮并单击“确定”按钮,则 Txt1 文本框中内容与 Txt2 文本框中内容进行交换,并在标签处显示“交换完成”;如果选中“连接”单选按钮并单击“确定”按钮后,则把交换后的 Txt1 和 Txt2 的内容连接起来,并在标签处显示连接的内容,如图 56-4 所示。保存时,工程文件名为 vbsj4.vbp,窗体文件名为 vbsj4.frm。
注意:不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,并单击“确定”按钮。退出程序时必须通过单击窗体右上角的关闭按钮,否则可能无成绩。
三、综合应用题
在名为 Form1 的窗体上建立一个名为 Txt1 的文本框(其 MultiLine 属性为 True, ScrollBars 属性为 2)和两个名称分别为 Cmd1 和 Cmd2 的命令按钮(其标题分别为“读取” 和“保存”),如图 56-5 所示。
要求程序运行后,如果单击“读取”按钮,则读入 dr1.dat 文件中的 100 个整数,放 入一个数组中(数组下界为 1),同时在文本框 Txt1 中显示出来;如果单击“保存”按钮,则计算其中前 50 个数之和,并把求和结果在文本框 Txt1 中显示出来,同时把结果存入考 生文件夹中的文件 dw2.dat 中。
在考生的文件夹下有标准模块 model.bas,其中的 writedata 过程可以把结果存入指定的文件,考生可以把该模块文件添加到自己的工程中,直接调用此过程。
注意:文件必须存放在考生文件夹中,窗体文件名为 vbsj5.frm ,工程文件名为vbsj5.vbp,计算结果存入 dw2.dat 文件,否则没有成绩。
编辑推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |