以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  列计算  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=188600)
--  作者：1234567
--  发布时间：2023/10/4 10:49:00
--  列计算
假设有A、B两列，B=A*2。
当我在A列中输入1时，B列自动得到值2，
当我在B列中输入2时，A列自动得到值1，如何实现？
--  作者：有点蓝
--  发布时间：2023/10/5 22:45:00
--  
http://www.foxtable.com/webhelp/topics/0625.htm

Select Case e.DataCol.Name
    Case "A"
systemready = false
         e.DataRow("B") = e.NewValue * 2
systemready = true
    Case "B"
systemready = false
         e.DataRow("A") = e.NewValue / 2
systemready = true
End Select
--  作者：1234567
--  发布时间：2023/10/6 10:35:00
--  
如果有A、B、C三列呢？输入其中两列值，求得第三列数值。
--  作者：1234567
--  发布时间：2023/10/6 10:38:00
--  
A=3.14*B*C/1000
--  作者：有点蓝
--  发布时间：2023/10/7 8:58:00
--  
一样的用法

Select Case e.DataCol.Name
    Case "b","c"
systemready = false
         e.DataRow("A") = 3.14 * e.DataRow("B") * e.DataRow("C") / 1000
systemready = true