这种用法对吗?vf

来源：百度知道 编辑：UC知道 时间：2024/05/21 20:00:11
do case
case alltrim(thisform.combo1.value)=="" and alltrim(thisform.text1.value)==""
messagebox("你还没有输入查询条件",0+16+128,"系统提示")
case alltrim(thisform.combo1.value)<>"" and alltrim(thisform.text1.value)<>""
select * from 成本计算表 where alltrim(thisform.combo1.value)==alltrim(成本计算表.人员) and alltrim(thisform.text1.value)==alltrim(成本计算表.客户名称) into cursor aaa
thisform.grid1.recordsource="aaa"
thisform.refresh
case alltrim(thisform.combo1.value)<>"" and alltrim(thisform.text1.value)==""
select * from 成本计算表 where alltrim(thisform.combo1.value)==(成本计算表.人员) into cursor aaa
thisform.grid1.recordsource="aaa"
thisform.refresh
otherwise select * from 成本计算表 where alltrim(thisform.text1.value)==alltrim(成本计算表.客户名称) into cursor aaa
thisf

1 otherwise 后面的语句要另起一行；
2 thisform.refresh 可以放在ENDCASE后面，不必每个CASE 后面都要加；当然，这么写也不会出错。
其他没有什么问题了