计算结果的是、显示
表单设text1 text2 text3 和一个命令按钮目的:在text1中输入年份,在text2中输入月份,执行命令按钮,将结果显示在text3中
PUBLIC cl
sum 产量 FOR YEAR(日期)=VAL(thisform.text1.Value) WHILE month(日期)=VAL(thisform.text2.Value) TO cl
thisform.text3.value=cl
thisform.refresh
只能执行一次,再次显示为零。