ENDDO
THISFORM.Label2.Caption=STR(ma,4) 答案：8
五、程序设计题 （共20分，第1小题8分，第2小题12分） 1、编写一个循环结构程序计算５的阶乘。
2、有营业员数据表文件YYY.DBF和日销售数据表文件RXS.DBF
*RXS.DBF *YYY.DBF 营业员代码 品名 数量 单价 营业额 营业员 代码 姓名 性别 101 电视 3 1230.40 0000.00
101 天涯 女 102 电话 4 223.00 0000.00 102 海角 男 101 电扇 5 334.00 0000.00 103 风声 男 104 水起 女 103 电话 3 223.00 0000.00
102 电视 1 1230.40 0000.00
编程要求：（1）计算出RXS.DBF中的营业额字段的值。注：营业额=数量*单价
（2）根据用户输入的营业员代码查询某个营业员的全天营业额，按如下格式显示： 代码：101 姓名：天涯 性别： 女 品名 营业额
电视 3691.20 电扇 1670.00
营业额： 5361.20
答案： 1. Clear S=1
For n=1 to 5 S=s*n Endfor
?”5的阶乘为：”,s Return 2.
Select 1 Use rxs
Replace all 营业额 with 数量*单价 Select 2 Use yyy
Index on 营业员代码 tag dm Select rxs
Set relation to 营业员代码 imto yyy Accept “输入营业员代码：” to dm ?”代码：”+dm
Locate for 营业员代码=dm
?”姓名：”+yyy.姓名+”性别：”+yyy.性别
List 品名，营业额 for 营业员代码=dm off Sum 营业额 to x1 for 营业员代码=dm