主题：[求助]公式怎么不起作用

If(text([%pc%]) = Empty(),MsgBox("批次不能为空!",2),RecalcCol(GridName,"计划批次",1) And CopyFor("采购目录","序号,编码,通用名,简码,包装规格,产地,价格,药品类别,采购数量,计划批次","序号,编码,通用名,简码,包装规格,产地,价格,药品类别,采购数量,计划批次","采购药品", "=" ,- 1,"采购数量", ">" ,0) And SortCol(GridName,"序号",1) And OpenGrid("采购目录",1,1) And EvalFor("采购目录","金额","[价格] * [采购数量]") And EvalFor("采购目录","采购时间","FindText(""验收单据列表"",""计划时间"",""计划批次"", ""="" ,[计划批次])") And DelFor("采购目录","编码", "=" ,""))这个公式为什么不起作用，[%pc%〕是空的

-=-=-=- 以下内容由 金银花 在 2011年08月29日 05:02pm 时添加 -=-=-=-
还有为什么MsgBox("请填写批次!",2) And SetFocus("%pc%")点击确定后光标不能回到变量录入框

怎么没有人解答啊

试把“Empty()”改为“ "" ”行不？

不行

-=-=-=- 以下内容由 金银花 在 2011年08月30日 11:03am 时添加 -=-=-=-
请高手给于指点

变量[%pc%]好象是数值型的吧？这样试试？
If([%pc%] = 0,MsgBox("批次不能为空值!",0),RecalcCol(GridName,"计划批次",1) And CopyFor("采购目录","序号,编码,通用名,简码,包装规格,产地,价格,药品类别,采购数量,计划批次","序号,编码,通用名,简码,包装规格,产地,价格,药品类别,采购数量,计划批次","采购药品", "=" ,- 1,"采购数量", ">" ,0) And SortCol(GridName,"序号",1) And OpenGrid("采购目录",1,1) And EvalFor("采购目录","金额","[价格] * [采购数量]") And EvalFor("采购目录","采购时间","FindText(""验收单据列表"",""计划时间"",""计划批次"", ""="" ,[计划批次])") And DelFor("采购目录","编码", "=" ,""))

我想表达的意思是如果[%pc%]为空，就不能复制数据，这样给出提示后，将鼠标移到[%pc%]录入框上，这样的意思怎样用公式表达

If([%pc%] = 0,MsgBox("批次不能为空值!",0) And SetFocus("%pc%"),-----)