以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求教,在foxtable中的表格  列数据 “重量“ 每500克为1个计量单位,怎么设置,及赋值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=80477)

--  作者:guo2016hong
--  发布时间:2016/1/24 9:44:00
--  求教,在foxtable中的表格  列数据 “重量“ 每500克为1个计量单位,怎么设置,及赋值
求教,在foxtable中的表格  列数据 “重量“ 每500克为1个计量单位,怎么设置,及赋值
--  作者:wyz20130512
--  发布时间:2016/1/24 10:00:00
--  回复:(guo2016hong)求教,在foxtable中的表格  列...
可变通处理,如下图:
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160124095809.png
图片点击可在新窗口打开查看
重量列为数据列,重量2为表达式列,其表达式设为:[重量2] = [重量] / 500
[此贴子已经被作者于2016/1/24 10:01:55编辑过]

--  作者:guo2016hong
--  发布时间:2016/1/24 10:04:00
--  
不是,其实我不会调用CEILING函数,
500 1
1000 2
1500 3
501 2
1001 3
请求教

--  作者:wyz20130512
--  发布时间:2016/1/24 10:58:00
--  回复:(guo2016hong)不是,其实我不会调用CEILING函...
If e.DataCol.Name = "重量" Then
    If e.NewValue >= 500 Then
        e.NewValue = Math.Ceiling(e.NewValue/500)
    End If
End If

以上代码写在表的DataColChanged事件中

--  作者:guo2016hong
--  发布时间:2016/1/24 14:43:00
--  
谢谢你。
If e.DataCol.Name = "重量" Then
    If e.NewValue >  500 Then
       e.DataRow("变数")=Math.Ceiling(e.NewValue/500)
    Else 
       e.DataRow("变数")=1
    End If
End If
If e.DataCol.Name = "保价金额" Then
    If e.NewValue >=100 Then
       e.DataRow("保价费") = (e.newvalue/100)
    Else 
       e.DataRow("保价费") = 1
    End If
End If
关闭程序后,重新开启程序,“变数“一列的数据怎么没有保存。

--  作者:大红袍
--  发布时间:2016/1/24 14:44:00
--  

不应该,看看是否这个原因。

 

http://www.foxtable.com/help/topics/1380.htm

 

 

 


--  作者:guo2016hong
--  发布时间:2016/1/24 14:58:00
--  
好了。谢谢。