以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何将A、B两列中的最大值填入C列？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=48364)
--  作者：cqlpjks
--  发布时间：2014/3/27 16:37:00
--  如何将A、B两列中的最大值填入C列？

在列表达式(C列的表达式)中如何将A、B两列中的最大值填入C列？
--  作者：狐狸爸爸
--  发布时间：2014/3/27 16:47:00
--  

Select Case e.Datacol.Name

   Case "A","B"

      e.Datarow("C") = Math.Max(e.Datarow("A"),e.Datarow("B"))

End Select 
--  作者：y2287958
--  发布时间：2014/3/27 18:51:00
--  
表达式法：
IIF([第一列] > [第二列],[第一列],[第二列])
--  作者：lsy
--  发布时间：2014/3/27 20:11:00
--  

\'查找最大值:
Dim Int() As Integer = {8,45,6,2,67}
Dim lst As New List(Of Integer)
lst.Add(Int(0))
For i As Integer = 1 To Int.Length - 1
    If Int(i) > lst(0) Then
        lst(0) = Int(i)
    End If
Next
Output.Show(lst(0))

\'查找最小值:
Dim Int() As Integer = {8,45,6,2,67}
Dim lst As New List(Of Integer)
lst.Add(Int(0))
For i As Integer = 1 To Int.Length - 1
    If  Int(i) < lst(0) Then
        lst(0) = Int(i)
    End If
Next
Output.Show(lst(0))
--  作者：lpedu_jks
--  发布时间：2014/3/29 18:07:00
--  
谢谢！用列表达式和用表属性-表事件-DataColChenged已经搞定。