以文本方式查看主题 - 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2) ---- [求助]看看下面的公式有什么错误? (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=17982) |
-- 作者:还不错 -- 发布时间:2009/9/7 17:10:00 -- [求助]看看下面的公式有什么错误? if(Instr([账户名称],ListGrids())>0,SetVariable("%表名%",cell(row,"账户名称")) And if(cell(rows,"余额",[账户名称])<>0,msgbox("【"+[账户名称]+"】账簿有余额,不能删除! ",0),RemoveGrid([%表名%]) And DelRow(GridName,row)),msgbox("【"+[账户名称]+"】账簿已删除! ",0)) 原意是:当【账户名称】表中有数据时,提示账簿有余额,不能删除。但,实际上没有执行这个命令,而是执行了RemoveGrid([%表名%]) 命令,删除了有数据的账簿。请各位高手帮忙给看一下,哪里出了问题! |
-- 作者:Czy -- 发布时间:2009/9/7 19:29:00 -- if(Instr([账户名称],ListGrids())>0,SetVariable("%表名%",["账户名称"]) And if(cell([账户名称!rows],"余额","账户名称")<>0,msgbox("【"+[账户名称]+"】账簿有余额,不能删除! ",0),RemoveGrid([%表名%]) And DelRow(GridName,row)),msgbox("【"+[账户名称]+"】账簿已删除! ",0)) |
-- 作者:还不错 -- 发布时间:2009/9/8 10:23:00 -- if(Instr([账户名称],ListGrids())>0,SetVariable("%表名%",["账户名称"]) And if(cell([账户名称!rows],"余额","账户名称")<>0,msgbox("【"+[账户名称]+"】账簿有余额,不能删除! ",0),RemoveGrid([%表名%]) And DelRow(GridName,row)),msgbox("【"+[账户名称]+"】账簿已删除! ",0)) 有不可识别的变量"账户名称"! |
-- 作者:还不错 -- 发布时间:2009/9/8 10:36:00 -- RAR文件下载 |
-- 作者:Czy -- 发布时间:2009/9/8 13:11:00 -- 下面引用由还不错在 2009/09/08 10:23am 发表的内容: if(Instr(,ListGrids())>0,SetVariable("%表名%",) And if(cell(,"余额","账户名称")<>0,msgbox("【"++"】账簿有余额,不能删除! ",0),RemoveGrid ... 你不是说【账户名称】是个表吗?如果有这个表名称怎么会出现不可识别的变量呢?
|
-- 作者:Czy -- 发布时间:2009/9/8 13:11:00 -- 下面引用由还不错在 2009/09/08 10:36am 发表的内容: 开下门。 |
-- 作者:Czy -- 发布时间:2009/9/8 14:01:00 -- if(Instr([账户名称],ListGrids())>0,SetVariable("%表名%",[账户名称]) And if(eval("cell(["+[账户名称]+"!rows],""余额"",[账户名称])")<>0,msgbox("【"+[账户名称]+"】账簿有余额,不能删除! ",0),RemoveGrid([%表名%]) And DelRow(GridName,row)),msgbox("【"+[账户名称]+"】账簿已删除! ",0)) |
-- 作者:还不错 -- 发布时间:2009/9/8 14:39:00 -- whb kj -=-=-=- 以下内容由 还不错 在 2009年09月08日 02:40pm 时添加 -=-=-=- 不是管理密码!用研制者进入。 -=-=-=- 以下内容由 还不错 在 2009年09月08日 02:49pm 时添加 -=-=-=- 对不起,着急忘了把密码告诉大家了。 |
-- 作者:还不错 -- 发布时间:2009/9/8 16:54:00 -- 自己顶一下。 |
-- 作者:lyang70 -- 发布时间:2009/9/8 16:59:00 -- 呵呵,楼主给的公式用在哪?说清楚呀,光发个文件有什么用呢,让人空琢磨... |