Foxtable(狐表)用户栏目专家坐堂 → [求助]代码错误


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

主题:[求助]代码错误

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


加好友 发短信
等级:幼狐 帖子:126 积分:813 威望:0 精华:0 注册:2015/10/22 10:35:00
[求助]代码错误  发帖心情 Post By:2016/7/4 17:07:00 [显示全部帖子]

请问专家,下面这段代码怎么改才正确?
If e.DataRow.IsNull("本工序_应投产数量_根") OrElse (e.DataRow.("本工序_日生产能力_平锻机1")+e.DataRow.("本工序_日生产能力_平锻机2")+e.DataRow.("本工序_日生产能力_平锻机3")+e.DataRow.("本工序_日生产能力_平锻机4")+ e.DataRow.("本工序_日生产能力_平锻机5")+e.DataRow.("本工序_日生产能力_平锻机"))=0    Then
    e.DataRow("本工序_生产周期_天")=Nothing
    Else
    e.DataRow("本工序_生产周期_天") = e.DataRow("本工序_应投产数量_根") / (e.DataRow.("本工序_日生产能力_平锻机1")+e.DataRow.("本工序_日生产能力_平锻机2")+e.DataRow.("本工序_日生产能力_平锻机3")+e.DataRow.("本工序_日生产能力_平锻机4")+ e.DataRow.("本工序_日生产能力_平锻机5")+e.DataRow.("本工序_日生产能力_平锻机"))
End If

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


加好友 发短信
等级:幼狐 帖子:126 积分:813 威望:0 精华:0 注册:2015/10/22 10:35:00
  发帖心情 Post By:2016/7/4 17:23:00 [显示全部帖子]

错误提示如下:
编译错误:应为标识符
错误代码:
If e.DataRow.IsNull("本工序_应投产数量_根") OrElse (e.DataRow("本工序_日生产能力_平锻机1")+e.DataRow("本工序_日生产能力_平锻机2")+e.DataRow("本工序_日生产能力_平锻机3")+e.DataRow("本工序_日生产能力_平锻机4")+ e.DataRow("本工序_日生产能力_平锻机5")+e.DataRow("本工序_日生产能力_平锻机"))=0    Then

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


加好友 发短信
等级:幼狐 帖子:126 积分:813 威望:0 精华:0 注册:2015/10/22 10:35:00
  发帖心情 Post By:2016/7/4 17:42:00 [显示全部帖子]

扩大一些范围,看看问题在哪里?蓝色部分是从2楼粘贴的。
 Case "本工序_日生产能力_平锻机1","本工序_日生产能力_平锻机2","本工序_日生产能力_平锻机3","本工序_日生产能力_平锻机4","本工序_日生产能力_平锻机5","本工序_日生产能力_平锻机6","热处理工序_需要数量_根"
        If e.DataRow.IsNull("热处理工序_需要数量_根") Then
            e.DataRow("本工序_应投产数量_根")=Nothing
        Else
            e.DataRow("本工序_应投产数量_根") = e.DataRow("热处理工序_需要数量_根")*(e.DataRow("本工序_废品损失率_百分比")+1)
            
        End If
        If e.DataRow.IsNull("本工序_日生产能力_平锻机1") Then
            e.DataRow("本工序_日生产能力_平锻机1")=0
        Else If e.DataRow.IsNull("本工序_日生产能力_平锻机2") Then
            e.DataRow("本工序_日生产能力_平锻机2")=0
        Else If e.DataRow.IsNull("本工序_日生产能力_平锻机3") Then
            e.DataRow("本工序_日生产能力_平锻机3")=0
        Else If e.DataRow.IsNull("本工序_日生产能力_平锻机4") Then
            e.DataRow("本工序_日生产能力_平锻机4")=0
        Else If e.DataRow.IsNull("本工序_日生产能力_平锻机5") Then
            e.DataRow("本工序_日生产能力_平锻机5")=0
        Else If e.DataRow.IsNull("本工序_日生产能力_平锻机6") Then
            e.DataRow("本工序_日生产能力_平锻机6")=0
            If e.DataRow.IsNull("本工序_应投产数量_根") OrElse (e.DataRow("本工序_日生产能力_平锻机1")+e.DataRow("本工序_日生产能力_平锻机2")+e.DataRow("本工序_日生产能力_平锻机3")+e.DataRow("本工序_日生产能力_平锻机4")+ e.DataRow("本工序_日生产能力_平锻机5")+e.DataRow("本工序_日生产能力_平锻机"))=0    Then
                e.DataRow("本工序_生产周期_天")=Nothing
            Else
                e.DataRow("本工序_生产周期_天") = e.DataRow("本工序_应投产数量_根") / (e.DataRow.("本工序_日生产能力_平锻机1")+e.DataRow.("本工序_日生产能力_平锻机2")+e.DataRow.("本工序_日生产能力_平锻机3")+e.DataRow.("本工序_日生产能力_平锻机4")+ e.DataRow.("本工序_日生产能力_平锻机5")+e.DataRow.("本工序_日生产能力_平锻机"))
            End If       
        End If


 回到顶部