以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何把计算代码中得到的计算结果返回到指定的列内  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=1625)
--  作者：shihao821004
--  发布时间：2009/1/14 10:14:00
--  [求助]如何把计算代码中得到的计算结果返回到指定的列内
如何把“计算代码中”得到的计算结果返回到指定的列内
我没找到对应的函数。谁能告诉我，谢谢
--  作者：狐狸爸爸
--  发布时间：2009/1/14 10:21:00
--  
呵呵
1、已经没有计算代码了
2、再看两次帮助文件，就不会在这种问题上浪费时间了，磨刀不误砍柴工嘛。
[此贴子已经被作者于2009-1-14 10:33:34编辑过]
--  作者：blackzhu
--  发布时间：2009/1/14 10:41:00
--  
以下是引用shihao821004在2009-1-14 10:14:00的发言：
如何把“计算代码中”得到的计算结果返回到指定的列内
我没找到对应的函数。谁能告诉我，谢谢

  一个取消了,第二个本身的计算代码就是在列上计算的.返回的数据就是在这个列上的
--  作者：shihao821004
--  发布时间：2009/1/14 13:46:00
--  
以下是引用狐狸爸爸在2009-1-14 10:21:00的发言：
呵呵
1、已经没有计算代码了
2、再看两次帮助文件，就不会在这种问题上浪费时间了，磨刀不误砍柴工嘛。
[此贴子已经被作者于2009-1-14 10:33:34编辑过]

不明白，怎么说没有了。
我明明还在用啊。
数据表－设置列－其他－计算代码
--  作者：smileboy
--  发布时间：2009/1/14 13:51:00
--  
以下是引用shihao821004在2009-1-14 13:46:00的发言：

不明白，怎么说没有了。
我明明还在用啊。
数据表－设置列－其他－计算代码

只是暂时保留，便于大家把计算代码移走
--  作者：shihao821004
--  发布时间：2009/1/14 14:13:00
--  
以下是引用smileboy在2009-1-14 13:51:00的发言：

只是暂时保留，便于大家把计算代码移走

那我做复杂的表达式应该如何处理？没找到。请提示我，谢谢。
--  作者：kylin
--  发布时间：2009/1/14 14:16:00
--  
datacolchanged事件中写代码，具体参见帮助
[此贴子已经被作者于2009-1-14 14:16:06编辑过]
--  作者：shihao821004
--  发布时间：2009/1/14 15:01:00
--  
 

Dim d1 As Date = CurrentTable.Current("生产日期")

Dim d2 As Date = Date.Today

Dim ts As TimeSpan = d2 - d1

Output.Show(ts.Days)

请问老师，我想让这个结果显示在我表中的，距今天数列中，
要怎么做？
--  作者：czy
--  发布时间：2009/1/14 15:09:00
--  

If e.DataCol.Name = "生产日期" And e.Datarow.IsNull("生产日期")  = False Then
   Dim d1 As Date = CurrentTable.Current("生产日期")
   Dim d2 As Date = Date.Today
   Dim ts As TimeSpan = d2 - d1
   e.datarow("距今天数") = ts.Days
End If

--  作者：shihao821004
--  发布时间：2009/1/14 15:27:00
--  
以下是引用czy在2009-1-14 15:09:00的发言：

If e.DataCol.Name = "生产日期" And e.Datarow.IsNull("生产日期")  = False Then
   Dim d1 As Date = CurrentTable.Current("生产日期")
   Dim d2 As Date = Date.Today
   Dim ts As TimeSpan = d2 - d1
   e.datarow("距今天数") = ts.Days
End If

终于解决了，万分感谢各位老师的耐心解答。

请问老师，我想要计算出的结果以月为单位显示要怎么做？
 e.datarow("宝宝月龄") = ts.Days \\30
如果这样的话，当天数为负值的时候，显示的结果都是0.对于负值的结果应该如何处理。

[此贴子已经被作者于2009-1-19 11:45:14编辑过]