- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求解：报价信息表中数据不计算 求纠正！ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=66540)
-- 发布时间：2015/4/9 9:54:00
-- 求解：报价信息表中数据不计算 求纠正！
在列变动事件中写了如下代码： 红色部分代码不运行 求解！
Select Case e.DataCol.name
Case "单价","数量"
e.DataRow("总价")=e.DataRow("单价")*e.DataRow("数量")
e.DataRow("总进货价")=e.DataRow("进货价")*e.DataRow("数量")
End Select
但是当再次变动数量或单价时候 上述红色部分代码可以计算出值
求纠正：当选择了对应物品类型下的数据后，就自动计算出所有数据！
此主题相关图片如下：111.jpg
此主题相关图片如下：11112.jpg
-- 发布时间：2015/4/9 9:57:00
--
如果表中已经输入数据，那么在加入上述代码后，选择身份证号码列，然后在“数据表”功能区“列相关”功能组，单击下面的“重置”按钮：
帮助有说明这一点
-- 发布时间：2015/4/9 10:02:00
-- 回复：（Bin）如果表中已经输入数据，那么在加入上述代...
DataTables("员工").DataCols("出生日期").RaiseDataColChanged()
我用了如此代码页不行
-- 发布时间：2015/4/9 10:06:00
--
Case "单价","数量"
-- 发布时间：2015/4/9 10:12:00
-- 回复：（Bin）Case "单价","数量"你代码明明是 判断单...
DataTables("员工").DataCols("出生日期").RaiseDataColChanged()
我做了如下修改
DataTables("报价信息").DataCols("总进货价").RaiseDataColChanged()
-- 发布时间：2015/4/9 10:15:00
--
你原来的代码：
Select Case e.DataCol.name
Case "单价","数量"
e.DataRow("总价")=e.DataRow("单价")*e.DataRow("数量")
e.DataRow("总进货价")=e.DataRow("进货价")*e.DataRow("数量")
End Select
Case语句有进货价吗？ 不加上，怎么自动更新。
分开两个：
Select Case e.DataCol.name
Case "单价","数量"
e.DataRow("总价")=e.DataRow("单价")*e.DataRow("数量")
End Select
Select Case e.DataCol.name
Case "进货价","数量"
e.DataRow("总进货价")=e.DataRow("进货价")*e.DataRow("数量")
End Select
建议看看：
http://www.foxtable.com/help/topics/2242.htm
-- 发布时间：2015/4/9 10:26:00
-- 回复：（狐狸爸爸）你原来的代码： Select C...
谢谢 居然犯了一个低级错误！ 再次谢谢