List 姓名,职称,基本工资 for 基本工资>=600 and 基本工资<=850 (2) 将zgdab.dbf按性别进行排序，存入sst1中。Sort on 性别 to sst1 （3）按基本工资的升序建立单索引文件BB。Inde on 基本工资 to bb （4）逻辑删除数据库表zgdab.dbf中最后3个记录。 Go bott Skip –2 Dele next 3 （5）显示男教师中基本工资900元以上的记录。 List for 性别=“男” and 基本工资>900 2编程实现如下的计算：
表单如图：
说明：表单上有两个名为text1和text2的文本框控件，两个命令按钮command1的caption=“计算”和cammand2的caption=”退出”。
要求：（1）在文本框text1中输入数值，点击“计算”得出该数的阶乘，在文本框text2中显示结果。
X=thisform.text1.value T=1 N=1 Do while n<=x T=t*n N=n+1 Enddo Thisform.text2.value=t
（2）点击退出，则释放该表单。 Release thisform
3编程实现如下的计算：
表单如图：
说明：表单上有一个名为text1的文本框控件，两个命令按钮command1的caption=“计算”和cammand2的caption=”清除”。
要求：（1）在文本框中输入数值，点击计算得出该数的前n项和,例如：n=12,则求：1+2+3+4+5+6+7+8+9+10+11+12=？，并在文本框中显示 x=thisform.text1.value
s=0 n=1
do while n<=x s=s+n n=n+1 enddo
thisform.text1.value=s
4该表单的功能是实现职工记录的添加和删除，职工档案表已经添到数据环境中。表单界面如下：
要求：
（1）出标题为“前一条”的命令按钮的click事件代码。 （2）出标题为“后一条”的命令按钮的click事件代码。）
（3）写出标题为“添加”的命令按钮的click事件代码，来实现追加新记录。 （4）写出标题为“删除”的命令按钮的click事件代码。 dele 程序设计类
1用do while循环求出ZGDAB.DBF中男性工程师和女性讲师的人数各是多少 2从键盘输入数值x,若为正数，则显示出来 3求31+32+33+…+50的和 4求y=
1?2!2?3!3?4!10?11!???...?的值 2?33?44?511?125编写顺序结构程序，从键盘输入半径R,求出圆面积，并显示出来 6求2+1！+3+2！+4+3！+…+11+10！的和 7、求1~100间偶数之和
4x2+4x+1 x≥0 8、求Y=
的值
4x2-4x-1 x<0
9、求100以内所有能被3整除的数的和
1 USE ZGDAB X=0 Y=0
DO WHILE .NOT. EOF() DO CASE
Case 性别=”男” and 职称=”工程师”
X=x+1
Case性别=”女” and 职称=”讲师” Y=y+1 Endcase Skip 1 Enddo ?x,y use 2 Input to x If x>0 ?x Endif 3
S=0 I=31
Do while i<=50 S=s+i I=i+1