【程序说明】 如下图所示,设计一个可供逐条记录翻页查看职工档案表(ZGDA.
DBF)内容的表单,首先打开表单设计器,采用“快速表单”方法,在该表单的数据环境中加入ZGDA表,并完成表单布局;然后在表单的下方添加命令按钮组,依次包括:“上页”、“下页”、“退出”3个按钮。 【程序】 命令按钮组Click事件的程序代码如下: DO CASE CASE This. Value=1 (9) IF BOF ( ) GO BOTT ENDIF ThisForm. Refresh CASE This. Value=2 (10) IF EOF( ) GO TOP ENDIF (11) CASE This. Value=3 (12) ENDCASE |
【程序说明】程序功能是计算一个整数的各位数字之和。 【程序】 SET TALK OFF INPUT“x=”TO x s=0 DO WHILE x!=0 s=s+ MOD(x,10) (1) (2) S SET TALK ON |
我来回答: