一、基本操作题

　　(1)在名称为Form1的窗体中建立一个标题为“显示结果”、名称为Command1的命令按钮，要求程序运行后，如果单击“显示结果”按钮，则执行语句Form1.Print“显示结果”;如果单击窗体，则执行语句Form1.Cls，如图12-1所示。

 

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

　　(2)在名称为Form1的窗体上建立一个垂直滚动条，名称为VS1，其最大值为50，最小值为0。要求程序运行后，每次移动滚动块时，都执行语句Form1.Print VS1.Value，如图12-2所示(程序中不能使用任何变量)。

 

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

　　二、简单应用题

　　(1)在考生文件夹中有工程文件sj3.vbp及其窗体文件sj3.frm，该程序是不完整的。在窗体上有两个单选按钮，名称分别为Op1和Op2，标题分别为“斜体”和“黑体”，一个文本框，名称为Text1，字体为宋体，字号为四号字，还有一个命令按钮，名称为Command1，标题为“切换”。要求程序运行后，在文本框中输入“测试结果”，并选择一个单选按钮，单击“切换”按钮后，会根据所选的单选按钮来切换文本框中所显示的汉字字体，程序运行时的窗体界面如图12-3所示。

 

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

　　(2)在考生文件夹下有一个工程文件sj4.vbp，窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，标题是“计算”。程序运行后，单击“计算”命令按钮，通过对话框输人整数12，放入整型变量a中，然后计算1+2+3+…+a(提示：运算结果应放人Long型变量中)，如图12-4所示。在文本框中显示结果，并把结果存入文件out4.txt中。在考生文件夹中有一个标准模块mode4.bas，该模块中提供了保存文件的过程WriteData，考生可以直接调用。

 

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

　　三、综合应用题

　　在考生文件夹中有工程文件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文件中，否则没有成绩。