Foxtable(狐表)用户栏目专家坐堂 → 日期类型的列怎么自动统计


  共有10462人关注过本帖树形打印复制链接

主题:日期类型的列怎么自动统计

帅哥哟,离线,有人找我吗?
ramen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:135 积分:946 威望:0 精华:0 注册:2012/8/26 23:34:00
日期类型的列怎么自动统计  发帖心情 Post By:2012/12/2 21:35:00 [只看该作者]

有个问题请教一下,我做了一个表格,年休_1,年休_2,年休_3,年休_4列的类型是日期时间,合计列的类型是整数;我想在年休_1,2,3,4那里输入日期,只要单元格有值,合计就自动统计天数,如果清空,合计也跟着清空,我设了一串代码在表事件里,但是好像不行,麻烦高手看看怎么设置代码?
If e.DataCol.Name Like "年休_1" Then
     If e.DataRow.IsNull("合计") Then e.DataRow("合计") = 0
     If e.NewValue = "" Then
         e.DataRow("合计") = e.DataRow("合计") - 1
     Else If e.OldValue = "" Then
         e.DataRow("合计") = e.DataRow("合计") + 1
 End If
End If
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:年休.table




 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4759 积分:34603 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2012/12/3 3:43:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:年休.table


 回到顶部
帅哥哟,离线,有人找我吗?
ramen
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:135 积分:946 威望:0 精华:0 注册:2012/8/26 23:34:00
  发帖心情 Post By:2012/12/3 14:41:00 [只看该作者]

请高手指点,怎么样设置代码?
代码不能实现,只要输入日期,就会出现错误,弹出以下信息:

.NET Framework 版本:2.0.50727.5466
Foxtable 版本:2012.10.23.1
错误所在事件:表,年休,DataColChanged
详细错误信息:
System.Reflection.TargetInvocationException: 调用的目标发生了异常。 ---> System.InvalidCastException: 从字符串“”到类型“Date”的转换无效。
   在 Microsoft.VisualBasic.CompilerServices.Conversions.ToDate(String Value)
   在 Microsoft.VisualBasic.CompilerServices.Operators.CompareObject2(Object Left, Object Right, Boolean TextCompare)
   在 Microsoft.VisualBasic.CompilerServices.Operators.ConditionalCompareObjectEqual(Object Left, Object Right, Boolean TextCompare)
   在 UserCode.DataColChanged(DataColEventArgs e)
   --- 内部异常堆栈跟踪的结尾 ---
   在 System.RuntimeMethodHandle._InvokeMethodFast(Object target, Object[] arguments, SignatureStruct& sig, MethodAttributes methodAttributes, RuntimeTypeHandle typeOwner)
   在 System.RuntimeMethodHandle.InvokeMethodFast(Object target, Object[] arguments, Signature sig, MethodAttributes methodAttributes, RuntimeTypeHandle typeOwner)
   在 System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture, Boolean skipVisibilityChecks)
   在 System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture)
   在 Foxtable.DataTable.OO11100l1101ll0OOO0100O1(Object Oll10O, DataColumnChangeEventArgs O)

 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4759 积分:34603 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2012/12/3 14:56:00 [只看该作者]

一定要用代码吗

 回到顶部
帅哥哟,离线,有人找我吗?
ramen
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:135 积分:946 威望:0 精华:0 注册:2012/8/26 23:34:00
  发帖心情 Post By:2012/12/3 14:59:00 [只看该作者]

不一定的,只要能实现就可以?但是日期类型的不能统计,只有数字类型的才能统计,所以不知道怎么弄?我想日期能在日历那里录入,合计列又能自动统计天数!
[此贴子已经被作者于2012-12-3 15:00:20编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/12/3 15:01:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目57.table

 

Select Case e.DataCol.name
    Case "年休_1","年休_2","年休_3","年休_4"
        Dim dr As DataRow = e.DataRow
        dr("合计") = iif(dr.IsNull("年休_1"),0,1) + iif(dr.IsNull("年休_2"),0,1) + iif(dr.IsNull("年休_3"),0,1) + iif(dr.IsNull("年休_4"),0,1)
End Select


 回到顶部
帅哥哟,离线,有人找我吗?
ramen
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:135 积分:946 威望:0 精华:0 注册:2012/8/26 23:34:00
  发帖心情 Post By:2012/12/3 15:25:00 [只看该作者]

可以实现了,谢谢狐狸爸爸!

 回到顶部