如何将A、B两列中的最大值填入C列？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何将A、B两列中的最大值填入C列？

共有4873人关注过本帖树形打印复制链接主题：如何将A、B两列中的最大值填入C列？

cqlpjks

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：一尾狐帖子：407 积分：3194 威望：0 精华：0 注册：2011/2/28 11:57:00

如何将A、B两列中的最大值填入C列？ 发帖心情

Post By：2014/3/27 16:37:00 [只看该作者]

在列表达式(C列的表达式)中如何将A、B两列中的最大值填入C列？

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：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

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：4751 积分：34563 威望：0 精华：0 注册：2008/8/31 22:44:00

Post By：2014/3/27 18:51:00 [只看该作者]

表达式法：

IIF([第一列] > [第二列],[第一列],[第二列])

lsy

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00

Post By：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

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：41 积分：479 威望：0 精华：0 注册：2012/4/12 9:51:00

Post By：2014/3/29 18:07:00 [只看该作者]

谢谢！用列表达式和用表属性-表事件-DataColChenged已经搞定。

下一主题 >> << 上一主题

主题：如何将A、B两列中的最大值填入C列？