全国计算机等级二级VisualFoxPro上机试题（13）
一、基本操作题
(1)在名称为Form1的窗体上绘制一个文本框，其名称为Text1，然后通过“属性”窗口设置窗体和文本框的属性，实现如下功能：
在文本框中可以显示多行文本，显示垂直滚动条，显示的初始信息为“模拟考试”，显示的字体为四号、黑体;窗体的标题为“设置文本框属性”，如图13-1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sj1.vbp，窗体文件名为sj1.frm。
(2)在名称为Form1的窗体上绘制两个命令按钮，其名称分别为Command1和Command2，编写适当的事件过程。程序运行界面如图13-2所示，如果单击命令按钮Command1，则可使该按钮移到顶部;如果单击命令按钮Command2，则可使该按钮在高度和宽度上各扩大到原来的2和3倍。程序运行时的窗体界面如图13-3所示。
注意：不得使用任何变量，存盘时必须存放在考生文件夹下，工程文件名为sj2.vbp，窗体文件名为sj2.frm。
二、简单应用题
(1)在考生文件夹下有一个工程文件sj3.vbp，相应的窗体文件为sj3.frm。其功能是产生40个0～800的随机整数，放人一个数组中，然后输出其中的最小值。程序运行后，单击名称为Command1的命令按钮，标题为“输出最小值”，即可求出其最小值，并在Text1文本框中显示出来，如图13-4所示。这个程序不完整，请把它补充完整，并能正确运行。
注意：去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sj4.vbp，相应的窗体文件为sj4.frm，在窗体上有一个命令按钮和一个文本框。程序运行后，单击命令按钮，即可计算出100～800范围内能被3整除和能被5整除的整数的个数，并在文本框中显示出来，如图13-5所示。在窗体的代码窗口中，已给出了部分程序。
注意：请勿改动程序中的其他任何内容，只将“?”处的代码编写完整。最后把修改后的文件按原文件名存盘。
三、综合应用题
在考生文件夹下有一个工程文件sj5.vbp，相应的窗体文件为sj5.frm，此外还有一个名为sjin.txt的文本文件，其内容如下：
10 11 12 13 14 15 16 17 18 19 20 21 22 2324 25
程序运行后，单击窗体，将把文件sjin.txt中的数据输入到一维数组Arr中，在窗体中按4行4列的矩阵形式显示出来，并在Text1输出矩阵右上——左下对角线上的数据，如图13-6所示。
在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。
注意：去掉程序中的注释符“'”，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
答案与解析
一、基本操作题
(1)根据题意，新建“标准EXE”工程，将一个文本框控件添加到窗体中，名称为Text1、MultiLine属性为True、Text属性为“模拟考试”、ScrollBar属性为2、Font中字体为宋体，字型为黑体、大小为四号，设置完成后，单击按钮运行程序，并按原文件名保存。
(2)根据题意，新建“标准EXE”工程，将两个命令按钮添加到窗体中，名称分别为Command1和Command2，Caption属性分别为“Command1”和“Command2”，双击Com-mand1进入代码窗口，编写如下代码：
二、简单应用题
(1)在数组求最小值中，定义一个变量，用来存放数组中的最小值，在数组比较开始前，对变量进行赋初始值。在比较中，使用循环让变量和数组中的每个元素进行逐个比较，每次比较后变量中保存两个数中最小的数，循环结束后，变量中存放的数即为最小值。
由于要产生随机数，所以要调用Rnd( )函数，Rnd函数返回小于1，但大于或等于0的值，其语法格式为：Rnd[(number)]。number参数是可选的，是Single或任何有效的数值表达式。number的值决定了Rnd函数生成随机数的方式。为了生成某个范围内的随机整数，可使用公式：Int((upperbound一lowerbound+1)*Rnd+lowerbound)。这里，upperbound是随机数范围的上限，而lowerbound则是随机数范围的下限。具体代码如下：
(2)本题使用Mod运算符来判断一个数是否可以被另一个数整除，如果计算结果为0，则表示可以整除，否则不能整除。具体代码如下：
三、综合应用题
根据题意，将一个文本框控件和一个标签添加到窗体中，文本框的名称为Text1，Text属性为空，标签的Caption属性为“右上一左下对角线的数”，具体代码如下(其中(i*4一i+1)代表对角线的数在数组中的位置)
