vfp 编程的问题!提示“找不到parameter语句”,请高手指教!!

来源:百度知道 编辑:UC知道 时间:2024/06/04 09:54:59
我编写的语句如下:(它在一按纽的CLICK事件里,不知道怎么回事老提示上面的句子。)

parameter cparam1
if empty(alltrim(thisform.list4.value))
messagebox("对不起!条件不全,不能查询!"+chr(13)+chr(13)+"确认后请重新选择!",48,'提示')
thisform.refresh
return 0
else
cParam1=thisform.list4.value
do form jieguo with cParam1
endif
thisform.refresh

如果程序就这么几句的话,parameter语句是多余的。因为这个参数没有在程序中使用。

如果需要这么一句的话,PARAMETERS 应该是出现在一个过程、子程序、函数或或独立程序中。

parameter cparam1
if empty(alltrim(thisform.list4.value))
messagebox("对不起!条件不全,不能查询!"+chr(13)+chr(13)+"确认后请重新选择!",48,'提示')
thisform.refresh
return 0
else
cParam1=thisform.list4.value
do form jieguo with cParam1
endif
thisform.refresh