Foxtable(狐表)用户栏目专家坐堂 → [求助]关于消除0值的问题~~~~~~~~~~~~~~


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

主题:[求助]关于消除0值的问题~~~~~~~~~~~~~~

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


加好友 发短信
等级:五尾狐 帖子:1165 积分:9032 威望:0 精华:1 注册:2011/5/25 16:33:00
[求助]关于消除0值的问题~~~~~~~~~~~~~~  发帖心情 Post By:2012/6/8 13:28:00 [只看该作者]

我按钮里有段代码是增加临时列的 增加后 如何消除其中的0值??

 

 

图片点击可在新窗口打开查看

 

DataTables("考勤管理_考勤管理Table1").StopRedraw
DataTables("考勤管理_考勤管理Table1").DataCols.Add("出勤", Gettype(String), "IIF([一]= '√',1,0) + IIF([二]= '√',1,0) + IIF([三]= '√',1,0) + IIF([四]= '√',1,0) + IIF([五]= '√',1,0) + IIF([六]= '√',1,0) +IIF([七]= '√',1,0) + IIF([八]= '√',1,0) + IIF([九]= '√',1,0) + IIF([十]= '√',1,0) + IIF([十一]= '√',1,0) + IIF([十二]= '√',1,0) + IIF([十三]= '√',1,0) + IIF([十四]= '√',1,0) + IIF([十五]= '√',1,0) + IIF([十六]= '√',1,0) + IIF([十七]= '√',1,0) + IIF([十八]= '√',1,0) + IIF([十九]= '√',1,0) + IIF([二十]= '√',1,0) + IIF([二十一]= '√',1,0) + IIF([二十二]= '√',1,0) + IIF([二十三]= '√',1,0) + IIF([二十四]= '√',1,0) + IIF([二十五]= '√',1,0) + IIF([二十六]= '√',1,0) + IIF([二十七]= '√',1,0) + IIF([二十八]= '√',1,0) + IIF([二十九]= '√',1,0) + IIF([三十]= '√',1,0) + IIF([三十一]= '√',1,0)")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("早退", Gettype(String), "IIF([一]= '早',1,0) + IIF([二]= '早',1,0) + IIF([三]= '早',1,0) + IIF([四]= '早',1,0) + IIF([五]= '早',1,0) + IIF([六]= '早',1,0) +IIF([七]= '早',1,0) + IIF([八]= '早',1,0) + IIF([九]= '早',1,0) + IIF([十]= '早',1,0) + IIF([十一]= '早',1,0) + IIF([十二]= '早',1,0) + IIF([十三]= '早',1,0) + IIF([十四]= '早',1,0) + IIF([十五]= '早',1,0) + IIF([十六]= '早',1,0) + IIF([十七]= '早',1,0) + IIF([十八]= '早',1,0) + IIF([十九]= '早',1,0) + IIF([二十]= '早',1,0) + IIF([二十一]= '早',1,0) + IIF([二十二]= '早',1,0) + IIF([二十三]= '早',1,0) + IIF([二十四]= '早',1,0) + IIF([二十五]= '早',1,0) + IIF([二十六]= '早',1,0) + IIF([二十七]= '早',1,0) + IIF([二十八]= '早',1,0) + IIF([二十九]= '早',1,0) + IIF([三十]= '早',1,0) + IIF([三十一]= '早',1,0)")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("迟到_总计", Gettype(String),"")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("迟到_5以内", Gettype(String),"")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("迟到_5-15", Gettype(String),"")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("迟到_15-30", Gettype(String),"")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("迟到_30以上", Gettype(String),"")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("事假_次数", Gettype(String),"IIF([一]= '事',1,0) + IIF([二]= '事',1,0) + IIF([三]= '事',1,0) + IIF([四]= '事',1,0) + IIF([五]= '事',1,0) + IIF([六]= '事',1,0) +IIF([七]= '事',1,0) + IIF([八]= '事',1,0) + IIF([九]= '事',1,0) + IIF([十]= '事',1,0) + IIF([十一]= '事',1,0) + IIF([十二]= '事',1,0) + IIF([十三]= '事',1,0) + IIF([十四]= '事',1,0) + IIF([十五]= '事',1,0) + IIF([十六]= '事',1,0) + IIF([十七]= '事',1,0) + IIF([十八]= '事',1,0) + IIF([十九]= '事',1,0) + IIF([二十]= '事',1,0) + IIF([二十一]= '事',1,0) + IIF([二十二]= '事',1,0) + IIF([二十三]= '事',1,0) + IIF([二十四]= '事',1,0) + IIF([二十五]= '事',1,0) + IIF([二十六]= '事',1,0) + IIF([二十七]= '事',1,0) + IIF([二十八]= '事',1,0) + IIF([二十九]= '事',1,0) + IIF([三十]= '事',1,0) + IIF([三十一]= '事',1,0)")
DataTables("考勤管理_考勤管理Table1").DataCols.Add("事假_相关备注", Gettype(String),"")

 

图片点击可在新窗口打开查看

我在datacolchanging里 设置

 

If e.DataCol.IsNumeric Then
    If
e.NewValue = 0 Then
        e.NewValue =
Nothing
    End
if
End
If

 

没效果哎

 

[此贴子已经被作者于2012-6-8 13:28:44编辑过]

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


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

在DrawCell事件设置代码,如果是0, 就不显示。


 回到顶部