以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何在一列里面显示出其前面几行的最大值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95629)

--  作者:qaz17909
--  发布时间:2017/1/26 16:51:00
--  如何在一列里面显示出其前面几行的最大值
一共五列,前面四列都是数字,如何在第五列显示出同一行前面四列中的最大值,用表事件,谢谢!
--  作者:wyz20130512
--  发布时间:2017/1/26 17:05:00
--  
DataColChanged事件代码

Dim cs() As String = {"第一列","第二列","第三列","第四列"}
Dim max As Integer
Select Case e.DataCol.Name
    Case "第一列","第二列","第三列","第四列"
        For Each c As String In cs
            max = Math.Max(max,e.DataRow(c))
        Next
        e.DataRow("第五列") = max
End Select
[此贴子已经被作者于2017/1/26 17:06:12编辑过]

--  作者:qaz17909
--  发布时间:2017/1/27 21:55:00
--  

十分感谢!!!