Foxtable(狐表)用户栏目专家坐堂 → 请帮助写一下代码?


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

主题:请帮助写一下代码?

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


加好友 发短信
等级:六尾狐 帖子:1294 积分:9852 威望:0 精华:0 注册:2012/9/19 21:13:00
请帮助写一下代码?  发帖心情 Post By:2014/1/13 15:17:00 [显示全部帖子]

如下代码:白毛档、边道印、刺坏三个是已知的,可以写成下列代码

Dim Z As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "白毛档","边道印","刺坏"

        Z("其他") = Z("白毛档")+Z("边道印")+Z("刺坏)

End Select

 

当新出现的问题(无法预知),问题不一定几个,如何用代码表示

就是新出现的问题也累计后给“其他”。

如:生产中无意出现了一个“黑点”

Dim Z As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "白毛档","边道印","刺坏"

        Z("其他") = Z("白毛档")+Z("边道印")+Z("刺坏)

    case “”

       Z(“其他”)=??

End Select


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


加好友 发短信
等级:六尾狐 帖子:1294 积分:9852 威望:0 精华:0 注册:2012/9/19 21:13:00
  发帖心情 Post By:2014/1/13 16:22:00 [显示全部帖子]

假设项目已经发布,就写了三个问题"白毛档","边道印","刺坏",那么当在生产过程中可能出现我们不知道的问题,(不是上面三个了),这时操作工输入在问题列里,那如何把新出现的而在项目中未列入的如何计算。加一段代码,来判断新加入的不是上面三个,在累计。

 

Dim Z As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "白毛档","边道印","刺坏"

        Z("其他") = Z("白毛档")+Z("边道印")+Z("刺坏)

End Select


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


加好友 发短信
等级:六尾狐 帖子:1294 积分:9852 威望:0 精华:0 注册:2012/9/19 21:13:00
  发帖心情 Post By:2014/1/13 16:33:00 [显示全部帖子]

就是这个意思

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


加好友 发短信
等级:六尾狐 帖子:1294 积分:9852 威望:0 精华:0 注册:2012/9/19 21:13:00
  发帖心情 Post By:2014/1/13 16:49:00 [显示全部帖子]

谢谢


 回到顶部