以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请帮助给解决写代码?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=28734)

--  作者:lyfxybc
--  发布时间:2013/2/16 20:13:00
--  请帮助给解决写代码?

请帮助给解决写代码?

如图:

如果单位为A  数值*给一组

              B  数值*给二组

              C  数值*给三组

              D  数值*给一组

              E  数值*给二组

              G  数值*给一组


图片点击可在新窗口打开查看此主题相关图片如下:19.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.foxdb

[此贴子已经被作者于2013-2-16 20:16:59编辑过]

--  作者:czy
--  发布时间:2013/2/16 20:36:00
--  

这样?

 

If e.DataCol.Name = "数值"
    Select Case e.DataRow("单位")
        Case "A","D","G"
            e.DataRow("一组") = e.DataRow("数值")
        Case "B","E"
            e.DataRow("二组") = e.DataRow("数值")
        Case "C"
            e.DataRow("三组") = e.DataRow("数值")
    End Select
End If


--  作者:lyfxybc
--  发布时间:2013/2/16 20:42:00
--  

非常感谢