Foxtable(狐表)用户栏目专家坐堂 → [求助]简单问题,但不知道错在哪里?


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

主题:[求助]简单问题,但不知道错在哪里?

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


加好友 发短信
等级:幼狐 帖子:126 积分:813 威望:0 精华:0 注册:2015/10/22 10:35:00
[求助]简单问题,但不知道错在哪里?  发帖心情 Post By:2016/6/21 9:12:00 [只看该作者]

专家好,下面这段编码,为什么不出结果?
 Select Case e.DataCol.Name
Case "本工序_投产数量_根" ,"本工序_日生产能力_根"
        If e.DataRow.IsNull("本工序_投产数量_根") OrElse e.DataRow.IsNull("本工序_日生产能力_根") Then
            e.DataRow("本工序_生产周期_天")=Nothing
        Else
            e.DataRow("本工序_生产周期_天") = e.DataRow("本工序_投产数量_根") / e.DataRow("本工序_日生产能力_根")'计算D列的代码
        End If
End Select
我分别在"本工序_投产数量_根"中输入10000,在"本工序_日生产能力_根")中输入4000,在"本工序_生产周期_天"中没有结果显示,错在哪里?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/21 9:14:00 [只看该作者]

1、代码要写到DataColChanged事件

 

2、你那两列,不能是表达式列,必须是数据列。


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


加好友 发短信
等级:幼狐 帖子:126 积分:813 威望:0 精华:0 注册:2015/10/22 10:35:00
  发帖心情 Post By:2016/6/21 9:27:00 [只看该作者]

谢谢专家,有一列是表达式列,忽视了

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


加好友 发短信
等级:幼狐 帖子:126 积分:813 威望:0 精华:0 注册:2015/10/22 10:35:00
  发帖心情 Post By:2016/6/21 9:47:00 [只看该作者]

经过修改,编码如下:
Select Case e.DataCol.Name
 Case "本工序_投产数量_根" ,"本工序_日生产能力_根","交付数量_根","库存数量_根"
        If e.DataRow.IsNull("交付数量_根") Then
            e.DataRow("本工序_投产数量_根")=Nothing
        Else
            If e.DataRow.IsNull("库存数量_根") Then
                e.DataRow("库存数量_根")=0
                e.DataRow("本工序_投产数量_根") = e.DataRow("交付数量_根") - e.DataRow("库存数量_根")'
            End If
            If e.DataRow.IsNull("本工序_投产数量_根") OrElse e.DataRow.IsNull("本工序_日生产能力_根") Then
                e.DataRow("本工序_生产周期_天")=Nothing
                e.DataRow("本工序_生产周期_天") = e.DataRow("本工序_投产数量_根") / e.DataRow("本工序_日生产能力_根")
            End If
        End If
End Select
前面都没有问题,可是当分别在"本工序_投产数量_根"中输入10000,在"本工序_日生产能力_根")中输入4000,在"本工序_生产周期_天"中显示为0.00,应该是2.50才对,我找不到错在哪里?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/21 9:50:00 [只看该作者]

Select Case e.DataCol.Name
    Case "本工序_投产数量_根" ,"本工序_日生产能力_根","交付数量_根","库存数量_根"
        If e.DataRow.IsNull("交付数量_根") Then
            e.DataRow("本工序_投产数量_根")=Nothing
        Else
            If e.DataRow.IsNull("库存数量_根") Then
                e.DataRow("库存数量_根")=0
            Else
                e.DataRow("本工序_投产数量_根") = e.DataRow("交付数量_根") - e.DataRow("库存数量_根")'
            End If
            If e.DataRow.IsNull("本工序_投产数量_根") OrElse e.DataRow.IsNull("本工序_日生产能力_根") Then
                e.DataRow("本工序_生产周期_天")=Nothing
            Else
                e.DataRow("本工序_生产周期_天") = e.DataRow("本工序_投产数量_根") / e.DataRow("本工序_日生产能力_根")
            End If
        End If
End Select

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


加好友 发短信
等级:幼狐 帖子:126 积分:813 威望:0 精华:0 注册:2015/10/22 10:35:00
  发帖心情 Post By:2016/6/21 9:53:00 [只看该作者]

谢谢,没问题了

 回到顶部