计算机技术基础实验指导书

1、？计算机技术基础实验指导书目录第一部分上机实验的指导思想和要求1第二部分、实验内容2实验一Visual FoxPro基础知识与常用函数2实验二表达式与内存变量4实验三数据表的建立6实验四数据表的操作命令8实验五数据表的排序与索引，查询与统计9实验六表间的操作，数据库的创建维护、数据字典11实验七查询，视图，SQL语句12实验八SQL语句13实验九选择结构程序设计14实验十 循环程序设计15实验十一模块结构程序设计16实验十二面向对象程序设计17实验十三表单的创建19实验十四实用表单设计20实验十五报表设计21实验十六菜单设计22第一部分上机实验的指导思想和要求，上机实验的目的上机实验的目的，绝

2、不仅是为了验证教材和课堂上讲授的内容，或者验证自己所编写的程序的正确与否。学习程序设计，上机实验应达到以上目的：（）加深对讲授内容的理解，尤其是一些语法规定。通过上机来掌握语法规则是行之有效的方法。（）熟悉所用的操作系统。（）学会上机调试程序。通过反复上机掌握根据出错信息修改程序的方法。，上机实验前的准备工作。（）了解所用的计算机系统（包括Visual FoxPro系统）的性能和使用方法。（）复习和掌握与本实验有关的教学内容，设计好上机操作步骤。（）准备好上机所需的程序，切忌不编程序或抄别人的程序去上机。（）对实验中出现的问题应事先估计，对程序中自己有疑问的地方应先作上记号，以便上机时给予注意

3、。，上机实验的步骤上机实验应一人一组，独立实验。上机过程中出现的问题，除了是系统的问题以外，不要轻易举手问老师。尤其对“出错信息”，应善于分析判断。上机实验一般应包括以下几个步骤：（）打开实验指导书，阅读实验目的、内容和要求（）进入Visual FoxPro系统（通过执行“开始/程序/Microsoft Visual Studio 6.0/ Microsoft Visual FoxPro 6.0”或执行文件：“C:Program Files Microsoft Visual StudioVFP98VFP6.exe”）（）通过执行“文件”菜单中的“新建”命令建立各种文件，或直接在命令窗口中输入各

4、种命令。（4）说明：操作提示中内的内容（包括号本身）必须用具体的代码代替，写好实验报告实验报告应包括以下内容：（）实验目的。（）实验内容。（）对操作题要求写出完成的内容及主要操作步骤，对程序设计题或表单设计题要写出程序清单或相关属性、代码等。（）运行结果分析：要写出是否达到了实验目的，给出运行结果并对结果进行分析。第二部分、实验内容实验一Visual FoxPro基础知识与常用函数一、实验目的1，熟悉Visual FoxPro6.0的基本操作，启动与退出。2，了解环境变量的设计方法3，熟悉函数的调用方法及函数的功能。二、实验内容1，进入Visual FoxPro6.0，了解其界面，各菜单的内容

5、及主要功能，和EXCEL比较有何不同。2，设置默认目录：单击“工具”菜单中的“选项”命令，在“文件位置”选项卡中选择“默认目录”，单击“修改”按钮，然后输入默认目录，或单击其右边的.按钮选择相应的文件夹，确定后单击“设置为默认值”，关闭对话框。或使用命令：SET DEFAULT TO 3，先初步估计每个命令的执行结果，然后在命令窗口中输入以下命令，每输入完一个后按回车键，然后观察命令执行结果是否与你的估计相同，若不相同，则分析其原因并记录在实验报告上。1），数值处理函数在命令窗口中输入以下内容（其中的标点符号全部均为半角字符）说明?int(123.56)?int(-123.56)取整函数?sq

6、rt(9)求平方根?mod(100,3)?mod(100,-3)?mod(-100,3)?mod(100,-3)求余数，结果符号与第二个参数相同?round(15.235,2)?round(15.235,0)?round(78.56,-1)四舍五入函数?abs(-5)绝对值?exp(1)?exp(2)以e为底的指数函数?log(10)?log(exp(1)自然对数?max(12,3)?min(1,2,3)最大值与最小值函数2），常用的字符表达式测试函数在命令窗口中输入以下内容说明？AT(A,ABCDA)? AT(A,ABCDA,2)返回参数中第1个字符串在第2个字符串中从左数第N次出现的位置?

7、 RAT (A,ABCDA)? RAT(A,ABCDA,2)在第二个字符串中找第1个字符串，返回其位置，找时从右开始，位置从左开始数在第二个字符串中找第1个字符串第2次出现的位置，返回其位置，找时从右开始，位置从左开始数？LEN（ABCDE）? LEN(数学系)字符串的长度? isalpha(abcd1234)? isalpha(12asd)? isalpha(数学系)判断第1个字符是否为字母? isdigit(abcd1234)? isdigit (12asd)? isdigit (数学系)判断第1个字符是否为数字? islower(abcd)? islower(ADSF)? islower

8、(1234)判断第1个字符是否为小写字母? isupper(abcd)? isupper (ADSF)? isupper (1234)判断第1个字符是否为大写字母3），字符串处理函数在命令窗口中输入以下命令说明c=Beijing University?substr(c,4)?substr(c,4,3)?substr(嘉应学院,1,4)substr(c,n,m):从字符串C的第n个字符开始截取字符，1个汉字为2个字符? left(c,7)?left(嘉应学院,4)left(C,n)：从C的左边开始截取n个字符? right(c,10)?right(嘉应学院,4)从右边开始截取?len(c)?le

9、n(嘉应学院)求字符串的长度d= FoxPro ? Visual+trim(d)+6.0trim：去掉字符串尾部的空格? Visual+ltrim(d)+6.0ltrim：去掉字符串头部的空格? Visual+rtrim(d)+6.0rtrim：去掉字符串尾部的空格? Visual+alltrim(d)+6.0alltrim：去掉字符串头部和尾部的空格? 1+space(4)+2space(n)：着重n个空格?lower(d)?d?upper(d)?d将d中字符全部转换成小写字母将d中字符全部转换成大写字母4），日期与时间函数在命令窗口中输入以下命令说明TODAYDATE()?TODAY返回系

10、统当前日期?TIME()?DATETIME()返回系统当前时间返回系统当前日期与时间?YEAR(TODAY)返回年份?DAY(TODAY)返回参数中的日期?CMONTH(TODAY)返回参数中的月份（英文）?MONTH(TODAY)返回参数中的月份（数字）?DOW(TODAY)返回星期（数字）?CDOW(TODAY)返回星期（英文）实验二表达式与内存变量一、实验目的1，熟悉通过命令窗口求表达式的值的方法2，熟悉内存变量的使用方法二、实验内容通过命令窗口完成下列各题1，求出下列表达式的值（1）ASC(A)ASC(B) (2) ASC(2)MAX(-11,22.2) (5) MOD(22,5)MI

11、N(-22.2,22)（6）ISDIGIT(123) .AND. ISLOWER(FOXPRO)（7） Y=UPPER(y) (8) STR(223.22,6,2)+32 操作提示：在命令窗口中先输入问号：？，然后输入表达式。如第（1）题在命令窗口中输入：? ASC(A)ASC(B)2，求出下列表达式的值DVARCTOD(02/25/2001)DVAR1=DVAR+35DVAR2=DTOS(DVAR1)(1) DVAR1-4(2) CMONTH(DVAR1) (3)VARTYPE(DVAR1)(4) LEN(&DVAR2)(5) TYPE(&DVAR2)操作提示：先输入第（1）题前的个命令，然

12、后在命令窗口中先输入问号：？，然后输入表达式。如第（1）题在命令窗口中输入：? DVAR1-43，内存变量实验(1) 建立4个内存变量并赋值，然后显示内存变量的存储结构操作提示：用格式：变量名值定义4个内存变量，并赋值，内存变量名自定，值分别为数值型、字符型、日期型和逻辑型显示格式：？内存变量名1，内存变量名2，内存变量名3，内存变量4(2) 建立a(2)和b(2,2)，并给数组赋不同类型的值，最后显示其存储结构操作提示：先用下面命令定义数组：DIMENSIONa(2),b(2,2)然后给数组元素赋值，其格式为：1数组名(下标)=值，如：a(1)=1996-01-23b(1,2)=嘉应学院类似

13、地给a(2),b(1,1),b(2,1),b(2,2)赋值最后用下面命令显示变量结构：DISPLAY MEMORYlike a*DISPLAY MEMORYlike b*4，设ctest1=Visual FoxPro 6 is DataBase Management system.(1) 用函数的方法将其中的system改为System （ctest中的最后一个字符为英文的句号）操作提示：ctest1=left(ctest1,len(ctest1)-7)+S+right(ctest1,6)?ctest1(2) 取该字符串的长度除5的余数操作提示：a=len(ctest1)%5?a(3) 在该字

14、符串的两边加字符串-后赋给ctest2操作提示：ctest2=-+ctest1+-?ctest2(4) 将第5个字母的ASC码值减去32后放在原位置上并赋给ctest3操作提示：a=chr( asc(substr(ctest1,5,1)-32)ctest3=left(ctest1,4)+a+right(ctest1,len(ctest1)-5)?ctest35，显示信息实验(1) 在显示信息对话框中，设置标题为“显示”，内容为“显示信息对话框”，按钮为“确定”和“取消”操作提示：messagebox(显示信息对话框,1,标题)运行VFP6中文帮助，查找messagebox，查看该函数的其他信息

15、。(2) 在显示信息对话框中，设置标题为“显示”，内容为“提示信息”，按钮为“确定”，图标为“信息”操作提示：对1的函数作适当修改，其中第2个参数可通过帮助得到修改第2个参数，其值通过帮助中查找到的各数值或各数值之和 实验三数据表的建立一、实验目的熟悉数据表的建立方法。二、实验内容先设置默认目录1，建立一个名为zgda的自由表，表结构如下字段名类型宽度小数位编号字符型8姓名字符型8性别字符型2出生日期日期型8年龄整型4职称字符型6基本工资数值型82婚否逻辑型1备注备注型4照片通用型4记录如下：编号姓名性别出生日期年龄职称基本工资婚否备注照片刘红梅女09/10/7230工程师880.00FMem

16、oGen张立功男08/16/6735工程师960.00TMemoGen薛小妹女09/20/6834工程师960.00TMemoGen王刚男03/25/4854高工1280.00TMemoGen蒋大伟男10/14/5646工程师960.00FMemoGen李永远男09/15/5250高工1280.00TMemoGen马丽女11/25/7824助工760.00FMemoGen张小龙男06/12/6636工程师880.00FMemoGen欧阳敏慧女11/23/5745高工1088.00TMemoGen王永清男08/09/5745高工1088.00TMemoGen严奇男05/17/7725助工760.

17、00FMemoGen李平女02/01/7131工程师880.00TMemoGen劳峥嵘女08/09/8022助工700.00FMemoGen纪芳华女09/12/7230助工760.00FMemoGen2，建立一个名为“学生表”的自由表，内容，表结构如下字段名类型宽度小数位学号字符型8姓名字符型8性别字符型2出生日期日期型8年龄整型4政治面貌字符型4籍贯字符型6备注备注型4照片通用型4记录如下：学号姓名性别出生日期年龄政治面貌籍贯备注照片周颖女09/10/8220党员山东MemoGen赵立新男08/16/8220团员河北MemoGen刘冬梅女09/20/8022团员山东MemoGen李大伟男10

18、/14/8220群众河北MemoGen陈惠民男09/15/7923党员山东MemoGen王华男08/09/8121团员北京MemoGen黄志诚男06/12/7923团员河北MemoGen徐姗姗女08/11/8319群众内蒙古MemoGen陈晓女12/18/8220团员黑龙江MemoGen王少春男11/23/8022团员内蒙古MemoGen李霞女02/01/8121党员北京MemoGen马春燕女09/12/8319团员浙江MemoGen3，建立一个名为“成绩表”的自由表，表结构如下字段名类型宽度小数位学号字符型8姓名字符型8哲学数值型51数学数值型51外语数值型51计算机数值型51记录如下：学号

19、姓名哲学数学外语计算机周颖56.076.082.078.0赵立新67.085.076.066.0刘冬梅63.067.092.075.0李大伟52.088.084.092.0陈惠民68.091.077.079.0王华71.052.053.077.0黄志诚50.066.060.065.0徐姗姗76.079.090.078.0陈晓66.070.082.058.0王少春62.087.089.079.0李霞65.080.075.085.0马春燕68.074.079.088.0操作提示：1，通过执行“文件/新建”命令打开新建对话框，在对话框中选择“表”，然后单击“新建文件”按钮2，输入字段名、选择字段类型

20、、输入字段宽度、小数位（数值型字段），然后用鼠标将光标定位在下一个字段继续输入3，全部字段均建立后，单击“确定”按钮4，在弹出的对话框中选择“是”5，输入记录6，关闭记录输入窗口（系统会自动保存）实验四数据表的操作命令一、实验目的：熟悉数据表的操作命令，表中记录的排序方法和索引的建立和使用方法二、实验内容1，打开zgda表，查看表记录和表结构操作提示：按下面步骤输入相关命令使用USE命令打开ZGDA表使用LIST显示表记录使用LIST STRUCTURE显示表结构使用USE命令关闭表2，从zgda表中复制：姓名、性别和出生日期三个字段建立一个新表结构，表名为zgsr，然后查看该新表结构操作提示

21、：使用USE命令打开ZGDA表使用COPY复制表结构，格式为：copy structure to fields 打开 zgsrlist structure3，用zgda表中职称为工程师的记录建立一个名为gcs的表，然后查看该表内容和结构操作提示：使用USE命令打开ZGDA表使用COPY命令复制相关内容到新表,格式为：copy to for 使用use命令打开新表使用LIST显示表记录使用LIST STRUCTURE显示表结构4，将zgda表的记录另存为名为zgda.txt的文本文件，并查看该文本文件的内容操作提示：依次执行下面相关命令使用USE命令打开ZGDA表使用COPY命令复制相关内容到文

22、本文件，格式为：copy to type sdftype zgda.txtuse5，向zgda表中插入一个新记录，使新记录成为表的第5条记录，记录内容自定操作提示：使用USE命令打开ZGDA表移动记录指针到第4条条记录：goto 4Insert输入记录内容use6，显示zgda表中所有基本工资900的记录操作提示：使用USE命令打开ZGDA表使用LIST命令显示zgda表中所有基本工资900的记录，格式为：list for 7，显示zgda表中所有性别为“女”的记录操作提示：list for8，将zgda表中所有职工的年龄增加3岁，基本工资增加1成操作提示：使用replace命令，格式为：re

23、place all with , with 实验五数据表的排序与索引，查询与统计一、实验目的1，熟悉对表进行物理排序的方法2，熟悉索引的建立和使用方法3，熟悉数据表的查询与统计命令二、实验内容1，将zgda表中的所有记录先按性别再按基本工资的降序进行物理排序，并把排序结果保存到xbgzpx中。操作提示：使用USE命令打开ZGDA表使用SORT命令排序，格式为：sort on 排序字段名表TO目标文件名打开目标文件LIST 2，将zgda表中的所有记录按姓名进行物理排序，并把排序结果保存到xmpx中。操作提示：使用USE命令打开ZGDA表使用SORT命令排序，格式为：sort on 排序字段名T

24、O目标文件名打开目标文件查看表记录3，将zgda表中的所有记录按出生日期先后排序，生成只包含姓名、性别和出生日期3个字段的csrqpx.dbf文件操作提示：使用USE命令打开ZGDA表使用SORT命令排序，格式为：sort on 排序字段名TO目标文件名fields 打开目标文件查看表记录4，对zgda表中的所有记录按出生日期先后排序建立索引文件：csrqsy操作提示：使用USE命令打开ZGDA表查看表记录使用index命令建立索引，格式为：INDEX ON to 查看表记录5，对zgda表中的所有记录先按性别再按基本工资的降序进行排列建立单索引文件：xbgzsy操作提示：使用USE命令打开Z

25、GDA表使用index命令建立索引，格式为：INDEX ON to （其中:索引表达式可用： 性别STR（5000-基本工资,7,2） ）LIST6，为zgda表建立一个结构复合索引文件，包含一个按姓名索引的标识XM和一个按性别与日期索引的标识：xbcsrq，再创建一个名为zgzc的非结构复合索引文件，包含一个按职称索引的标识ZC操作提示：使用USE命令打开ZGDA表浏览表记录建立按姓名的结构复合索引，格式为：INDEX ON TAG 浏览表记录建立按性别与日期的结构复合索引，格式为：INDEX ON TAG （索引表达式可为： 性别+DTOC(出生日期,1)）浏览表记录建立按性别与日期的非结

26、构复合索引，格式为：INDEX ON TAG of 索引文件名浏览表记录7，用LOCATE命令查找zgda表中职称为“高工”的女职工操作提示：使用USE命令打开ZGDA表浏览表记录使用LOCATE命令查找，格式为：locate for displaycontinuedisplay8，求zgda表中的平均基本工资、女职工的基本工资总额、女职工的人数操作提示：使用USE命令打开ZGDA表average 基本工资 to 平均基本工资? 平均基本工资sum 基本工资 for 性别=女count for 性别=女 to rs?rs实验六表间的操作，数据库的创建维护、数据字典一、实验目的1，熟悉多工作区的

27、操作，表的物理连接与逻辑连接2，熟悉数据库的建立与向数据库中添加表的方法，数据库表间建立关联的方法3，熟悉字段属性的设置方法和字段的有效性规则的设置方法二、实验内容1，在第1个工作区中打开zgda表，在第2个工作区中打开职工工资：zggz表操作提示：选择1号工作区使用USE命令打开ZGDA表浏览表选择2号工作区使用USE命令打开ZGGZ表浏览表Close all2，以zjgz.dbf表对职工档案表zgda中有关职工的基本工资数据进行更新:基本工资为原基本工资zjgz中的增资额操作提示：close all使用USE命令打开ZGDA表按编号建索引，建立索引的格式为：INDEX ON 索引字段 TA

28、G 索引标识选择工作区2，打开 ZJGZ表按编号建索引选择工作区1使用UPDATE命令更新，格式为：update on 编号 from zjgz replace 基本工资with 基本工资+b.增资额list3，将职工档案表zgda中的字段：姓名、性别、职称和基本工资，及职工工资表zggz中的应发工资和实发工资两个字段共6个字段组成一个职工情况数据表：zgqk.dbf操作提示：close allselect buse zggzselect a使用USE命令打开ZGDA表join with b to zgqk for b.姓名=姓名 FIELDS姓名，性别，职称，基本工资，B.应发工资，B.实发

29、工资use zgqklist4，建立一个名为“教学管理”的数据库，然后将“学生表”和“成绩表”添加到该数据库。5，在学生表中以“学号”为主关键字建立一个主索引，在成绩表中以学生主关键字建立一个普通索引，在学生表和成绩之间按学号建立一个永久关系。6，设置学生表的字段有效规则如下：性别必须为“男”或“女”，成绩必须小于或等于100，学号的默认值为，性别的默认值为“男”。实验七查询，视图，SQL语句一、实验目的1，熟悉查询的建立方法2，熟悉视图的建立方法3，掌握用SQL语句建立表结构的方法。二、实验内容1，在“教学管理”数据库中，查询外语成绩在80分及以下的女同学，并按外语成绩从高到低的顺序输出其学

30、号、姓名和外语成绩，将结果以默认文件名保存到“我的文档”文件夹中。操作提示：使用查询设计器2，从“教学管理”数据库的学生表和成绩表中，抽取出学号、姓名、性别、外语和计算机5个字段组成一个名为“视图2”的SQL视图。操作提示：使用视图设计器3，创建一个名为“通信录”的自由表，含有以下字段：姓名 C(8)，生日D，家庭电话C（14），手机号码C（12）要求：使用SQL语句完成操作提示：使用create table命令，命令格式可参考教材例6-14，创建一个名“商品管理”的数据库，在此数据库中创建一个名为“商品”的数据表，该表含有以下5个字段：商品号C（8），商品名称C（16），单价N（8,2），数

31、量N（4），供应商号C（8）期中商品号的默认值为“JP_10000”，数量的有效范围在10到5000之间，设定供应商号为主索引。操作提示：参考教材例6-25，在“商品管理”的数据库中创建一个“供应商”表，含有以下字段：供应商号C（8），供应商名C（16），地址C（24），电话C（14），传真C（8）要求以供应高号为主索引建立一个外索引，并以“商品”表的主索引关键字建立关系操作提示：参考教材例6-36，使用查询设计器查询学生表中所有男生的记录,并将结果存入男生记录表中7，使用查询设计器查询学生表中所有女生党员的姓名,年龄与籍贯8，使用查询设计器查询成绩表中数学成绩位于前三名的记录9，使用查询设计

32、器查询成绩表中外语成绩在70到80之间(包括70和80)的学生记录实验八SQL语句一、实验目的熟悉使用SQL语句进行数据修改和数据查询的操作提示二、实验内容1，使用SQL命令,检索学生表中所有男生的记录,并将结果存入男生记录表中select * from 学生表 where 性别=男 into dbf 男生记录2，使用SQL命令,检索学生表中所有女生党员的姓名,年龄与籍贯3，使用SQL命令,检索学生表中所有的籍贯(不重复显示相同的籍贯)select distinct 籍贯 from 学生表4，使用SQL命令,检索成绩表中外语成绩在70到80之间(包括70和80)的学生记录5，使用SQL命令,检

33、索成绩表中数学成绩位于前三名的记录select * top 3 from 成绩表 order by 数学 desc6，6，使用SQL命令，列出“成绩表”中外语成绩在80分及以上的学生的姓名、性别、年龄。7，使用SQL命令，列出外语、数学、计算机三门课程总分在220以上的男生的姓名、性别、年龄select * from 学生表 where 性别=男 and 学号 in (select 学号 from 成绩 where 外语+数学+计算机220)或select * from 学生表 where 性别=男 and 学号 not in (select 学号 from 成绩 where 外语+数学+计算

34、机=80 and 年龄2110，统计“成绩表”中数学的最高成绩、外语的最低成绩和计算机的平均成绩select max(数学) as 数学最高分,min(外语) as 外语最低分,avg(计算机) as 计算机平均分 from 成绩表11，11，查询学生表中年龄最小的学生的出生日期和男生的平均年龄12，统计学生表中各种政治面貌的人数select 政治面貌,count(*) from 学生表 group by 政治面貌13，统计出学生表中,男生的不同籍贯的人数,并列出其第1个人的姓名和籍贯。select 姓名,籍贯,count(*) from 学生表 where 性别=男 group by 籍贯

35、14，14，统计学生表和成绩表中男生中数学、外语和计算机的最高分与女生中数学、外语和计算机的最高分select 性别,max(数学),max(外语),max(计算机) from 学生表,成绩表where 学生表.学号=成绩表.学号 group by 性别实验九选择结构程序设计一、实验目的1，熟悉应用程序建立、编写、修改、调试的基本方法。2，熟悉IF ELSE ENDIF 结构的应用。3，熟悉DO CASE 结构的应用。二、实验内容1，编程求下面分段函数的值(其中自变量x的值由键盘输入)。程序提示：使用input语句输入变量x的值使用ifelse if语句求y的值(可参照教材例7-12)输出x与

36、y的值2，编程求一元二次方程的根。程序提示：使用input语句输入一元二次方程的系数：a,b,cif a=0 输出“不是一元二次方程”cancelendifdisc=b2-4*a*cif disc0 输出“方程无实根”或输出实部和虚部else 求出方程的根并输出endif3，从键盘输入成绩，然后根据下面标准给出等级成绩(要求用DO CASE语句完成) 成绩 等级90100 A 80-69 B 70-79 C 60-69 D =90输出“等级为A”case score=80输出“等级为B”case score=70输出“等级为C”case score=60输出“等级为D”OTHERWISE输出“

37、等级为E”ENDCASE实验十 循环程序设计一、实验目的：熟悉SCANFORDOWHILE循环结构的应用。二、实验内容：1，用FOR循环语句编程求1！2！n! 程序提示：p=1输入n的值Sum=0for i=1 to n p=p*i sum=sum+pendfor 输出sum2，编程求成绩表中计算机成绩大于75的人数(用SCAN语句)程序提示：打开表sum=0scan for 计算机=75sum=sum+1endscan输出sum关闭表3，由键盘输入多串字符，每个字符串输入完成后给一 个选择提示：“是否继继续(Y/N？),若输入Y或y则继续，否则退出输出字母个数和数字个数。程序提示：y=ysu

38、ma=0sum1=0do while y=y or y=Y accept 输入一个字符串: to s for i=1 to len(s) &对s中的每一个字符 c=substr(s,i,1)&c为s中的第i个字符 if c=A and c=a and c=0 and c=9 &如果是数字，则数字个数加1 sum1=sum1+1 endif endfor wait 是否继续？(Y|N) to yenddo输出字母个数和数字个数4，设a、b为两个介于1和9之间的数字，若式子aab+bb=baa成立，则a、b两个数各应等于多少？试编程输出此问题的解程序提示：用for循环语句对1到9之间的所有可能情形

39、穷举，对每一组a、b判断式子是否成立，若成立则输出a、b。程序算法如下：for a=1 to 9 for b=1 to 9如果式子aab+bb=baa成立则输出a、bendforendfor5，自然对数的底e可用级数1+1/1!+1/2!+.+1/n!来逼近，试编程用该级数的前21项（n=20）之和来计算并输出e的近似值。要求用单层循环和双重循环两种方式实现程序提示：（1）用单层循环实现的方法参考1题（2）用双层循环实现的方法是将1题中循环体内求i!的程序：p=p*i用下面的循环语句代替:p=1for j=1 to i p=p*jendfor实验十一模块结构程序设计一、实验目的：熟悉过程与自定

40、义函数的定义与调用方法。二、实验内容1，用FOR循环语句编程求2！4！（2n）!，其中i!用过程实现程序提示：输入n的值sum=0for i=1 to n 调用过程求(2i)!,格式为：do 过程名 sum=sum+temdfor?sumreturn*下面为过程的定义算法procedure 过程名publit t &t=(2i)!为全局变量t=1for j=1 to 2*it=t*jendforendproc2，用for循环语句求2!+4!+6!+.+(2n) !，其中(2i) !用自定义函数实现程序提示：输入n的值sum=0i=2for i=1 to n调用函数求(2i)!并将其累加到sum

41、中。调用函数的格式为：函数名(2*i) endfor输出结果return*以下定义函数function 函数名parameters mt=1for j=1 to mt=t*jendforreturnt3，用scan循环语句实现：统计并输出“学生表.dbf”中男同学的人数与女同学的人数实验十二表单的创建一、实验目的与要求1，熟悉表单向导的使用方法。2，熟悉“表单控件工具栏”、“表单设计器”等使用方法。二、实验内容1，建立一个表单用于计算长方体的体积，表单界面如下：操作提示:建立一个空白表单，向表单中添加4个标签控件，修改其caption属性添加4个文本框，修改其value属性值为0.0添加两个命

42、令按钮，修改其caption属性双击“计算”按钮，添加如下代码a=thisform.text1.valueb=thisform.text2.valueh=thisform.text3.valuethisform.text4.value=a*b*hthisform.refresh关闭代码窗口双击“退出”按钮，添加如下代码thisform.release关闭代码窗口运行表单2，设计一个求n!的表单，其中n用文本框输入。操作提示：建立一个空白表单，向表单中添加2个标签控件，修改其caption属性添加2个文本框，一个用于输入n的值，另一个用于显示n!的值，修改其value属性值为0.0添加两个命令按

43、钮，修改其caption属性双击“计算”按钮，添加如下代码n=thisform.text1.valuep=1for i=2 to np=p*inextthisform.text2.value=pthisform.refresh退出按钮的代码与1题相同实验十三实用表单设计一、实验目的1，掌握表单设计的基本方法2，掌握通过表单对数据表进行操作的方法。二、实验内容不使用表单向导，设计一个表单，用于对表(zgda表)进行各种操作，包括通过按钮实现对表的浏览、输入与修改数据、添加记录、删除记录。三、实验要求1，自己设计表单界面，表单中一个界面只显示一个记录2，实验报告中要求绘制简单的表单界面，用表格写明

44、修改了哪些控件的哪些属性，并写明各命令按钮的代码。四、操作提示1，创建表单界面创建一个空表单，执行“表单”菜单中的“快速表单”命令，将zgda表中的除备注和照片之外的字段添加到“选定字段”栏中，在“样式”标签中选择一种样式。结果如下图所示：2，添加命令按钮组添加一个命令按钮组到表单中，右击该命令按钮组，选择生成器，设置如下：按钮数目：7标题依次为：首记录、上一条、下一条、末记录、增加、删除、退出布局方式：水平结果如下图所示：3，添加代码双击命令按钮组，在对象栏选择Command1，在过程中选择Click，添加（1）Command1的Click事件代码如下：go m

45、mand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.thisform.refresh（2）Command2的Click事件代码如下：skip -1mand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.t.if bof() go topendifthisform.refresh（3）Command3的Cl