以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  金额互算  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=39387)

--  作者:逆行舟
--  发布时间:2013/8/23 7:55:00
--  金额互算

在同一张表中

有数据列如下

个数    单价    总金额

 

单价列如果先录 ,判断有无个数列,如果有自动计算出总金额  个数*单价 

如果总金额先列,判断有无个数列,如果有自动计算出单价   总金额/个数

 

如果实现


--  作者:Bin
--  发布时间:2013/8/23 8:27:00
--  
select case e.dataco.name
     case "总金额"
        if e.datarow.isNull("单价") andalso e.datarow.isnull("个数")=false andalso e.datarow.isnull("总金额")=false then
              e.datarow("单价")=e.datarow("总金额")/e.datarow("个数")
        end if
     case "单价"
        if e.datarow.isNull("总金额") andalso e.datarow.isnull("个数")=false andalso e.datarow.isnull("单价")=false then
              e.datarow("总金额")=e.datarow("个数")*e.datarow("单价")
        end if
end select

--  作者:Bin
--  发布时间:2013/8/23 8:28:00
--  
在DatacolChanged事件
--  作者:逆行舟
--  发布时间:2013/8/23 13:33:00
--  
select case e.dataco.name 第一句不理解
--  作者:狐狸爸爸
--  发布时间:2013/8/23 14:45:00
--  

呵呵,这个都不理解?还怎么编程?

 

罚你去看三遍帮助文件。


--  作者:逆行舟
--  发布时间:2013/8/23 15:18:00
--  
我马上去看
--  作者:逆行舟
--  发布时间:2013/8/23 15:22:00
--  

我一查帮助发现了,原来BIN是想说e.datacol.name

少出来一个l,我就不认识了,是我太机械了,谢谢大家,我代码通过了 


--  作者:逆行舟
--  发布时间:2013/8/23 15:23:00
--  

谢谢爸爸棒头一喝