1、写出在表单上生成九九乘法表的事件代码。 参考答案: SET TALK 0FF DIMENSION P(9,9) I=1 D0 WHILE I<=9 J=1 D0 WHILE J<=I P(I,J)=I*J ??STR(I,1)+‘*’+STR(J,1)+‘=’+STR(P(I,J),2)+‘ ’ J=J+1 ENDDO ? I=I+1 ENDDORETURN SET TALK 0FF DIMENSION P(9,9) I=1 D0 WHILE I<=9 J=1 D0 WHILE J<=I P(I,J)=I*J ??STR(I,1)+‘*’+STR(J,1)+‘=’+STR(P(I,J),2)+‘ ’ J=J+1 ENDDO ? I=I+1 ENDDORETURN----------------------------------------2、写出利用VFP建立数据库、数据表、表单的步骤。 要求:(1)建立一个工资数据库,库中建立一个工资发放表,各字段如下: 姓名(C/8),工资(N/7/2),奖金(N/6/2)扣款(N/6/2),实发(N/7/2) (要求共5条记录) (2)利用工资发放数据表,建立一个显示每个人工资情况表单。要求能显示每个人的工资、奖金、扣款及实发数。要有“上一条”、“下一条”按钮和“退出”按钮。 参考答案: (1)先建立数据库GZ.DBC 进入VFP 6.O后,在“文件”菜单项下选择“新建”,然后选择“数据库”,输入GZ文件名按“确定”即可。 (2)建立数据表Gz.DBF 在数据库设计器中单击鼠标右键,“新建”数据表。输入文件名后输入各字段名、类型、宽度及小数位。最后输入5条记录。 (3)建立表单: 在“文件”下选择“新建”,再选择“表单”。 用鼠标指向表单后,单击鼠标右键,选择添加“数据环境”,将Gz表添加。然后将字段一一拖动到表单上。 把3个命令按钮拖动到表单上,为每个按钮的Caption属性分别改名为“上一条”,“下一条”“退出”。 双击“下一个”按钮为click事件填号代码。 IF EOFO GO TOP ELSE SKIP ENDIF 双击“上一个”按钮为Click事件填号代码。 IF EOFO G0 BOTT ELSE SKIP一1 ENDIF 双击“退出”按钮为Click事件填号代码。 This form.RELEAS USE最后选择“表单”命令项下执行表单命令,即可运行出结果。 (1)先建立数据库GZ.DBC 进入VFP 6.O后,在“文件”菜单项下选择“新建”,然后选择“数据库”,输入GZ文件名按“确定”即可。 (2)建立数据表Gz.DBF 在数据库设计器中单击鼠标右键,“新建”数据表。输入文件名后输入各字段名、类型、宽度及小数位。最后输入5条记录。 (3)建立表单: 在“文件”下选择“新建&rdquo
|