一、基本操作题

　　(1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。组合框中的文本内容为空，表项内容有“乒乓球”、“羽毛球”和“网球”3项。运行后的窗体如图所示。

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

　　(2)在名称为Forml、标题为“转换”的窗体上，画1个名称为Shapel、边框宽度为3的形状。再画两个标题分别为“椭圆”和“圆”的命令按钮。如下图所示。

　　要求：编写适当的事件过程，使得单击“椭圆”按钮时，Shapel的形状变换为椭圆;单击“圆”按钮时，Shapel的形状变换为圆。程序中不得使用变量，每个事件过程中只能写一条语句。

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

　　二、简单应用题

　　(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体Forml上有两个标题分别是“读数据”和“查找”的命令按钮。请画1个名称为Textl、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图所示。程序功能如下。

　　①在考生文件夹下的in.3.dat文件中存有100个正整数。单击“读数据”按钮，则将文件in3.dat中的数据读入数组a中。

　　②单击“查找”按钮，则查找数组a中所有为7的倍数的数据，并将这些数据顺次显示在Textl文本框内(数据之间用空格隔开)。“读数据”按钮的Click事件过程已经给出，请编写程序完成“查找”按钮的Click事件过程，实现上述功能。

　　注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须使用“查找”按钮完成查找过程，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后将程序按原文件名存盘。

　　(2)考生文件夹下有一个工程文件sit4.vbp。在窗体Forml上有两个名称为Commandl和Command2、标题分别为“重输”和“查找”的命令按钮。程序功能如下。

　　单击“重输”按钮，则清空Textl中的内容，等待用户输入由空格隔开的若干个英文单词;单击“查找”按钮，则找出Textl中最长的单词，并将其显示在Text2中。某一次的运行效果如图所示。请将“查找”按钮的Click事件过程中的注释符去掉，把?改为正确内容，以实现上述程序功能。

　　注意：考生不得修改窗体文件中已经存在的控件和程序，最后将程序按原文件名存盘。

　　三、综合应用题

　　考生文件夹下有一个工程文件sjt.s.vbp。在窗体Forml上有两个标题分别是“产生数据”和“重新排列”的命令按钮，有两个标题为“原始数据”和“排列数据”的标签。程序功能如下。

　　①单击“产生数据”按钮，则随机产生20个一位整数，存人数组a中，并同时显示在Textl中。

　　②单击“重新排列”按钮，则重新排列数组a中的元素：使等值的元素相邻存放，并且保持它们在数组a中首次出现的相对次序;最后将排列结果显示在Text2中。某一次运行结果如图所示。

　　请将“重新排列”按钮的Click事件过程中的注释符去掉，把“?”改为正确内容，以实现上述程序功能。

　　注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。

　　【参考答案】

　　一、基本操作题

　　(1)【解题思路】新建一个空白窗体，添加一个组合框控件，根据题目要求修改窗体和控件的属性值。

　　【操作步骤】

　　步骤1：新建一个空白窗体，设置窗体的属性，属性设置如表4.5所示。

　　步骤2：添加一个组合框控件，设置控件的属性，属性设置如表4.6所示。

　　完成设置后界面效果如图4.3所示。

　　步骤3：调试并运行程序，关闭程序后按题目要求存盘。

　　(2)【解题思路】新建一个空白窗体，添加一个形状控件和两个命令按钮，设置好窗体和控件的属性，对两个命令分别添加事件代码，使单击按钮时，窗体中的形状控件能够产生变化。

　　【操作步骤】

　　步骤1:新建一个空白窗体，设置窗体的属性，属性设置如表4.7所示。

　　步骤5：调试并运行程序，单击“椭圆”按钮，如图4.4所示，单击“圆”按钮，如图4.5所示，关闭程序后按题目要求存盘。