| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何让列表项目显示最大的值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=57169) |
| -- 作者：coolbhb -- 发布时间：2014/9/19 14:59:00 -- 如何让列表项目显示最大的值 有一个窗口，窗口有一个组合框，在打开窗口的时候自动在表中取得数值作为该组合框的列表项目，现在的问题是如何让这个列表项目在窗口打开后自动显示项目中最大数值呢？ |
| -- 作者：Bin -- 发布时间：2014/9/19 15:00:00 -- 利用Compute算出最大值http://www.foxtable.com/help/topics/0393.htm |
| -- 作者：有点甜 -- 发布时间：2014/9/19 15:02:00 -- afterload事件
e.Form.Controls("ComboBox1").Text = DataTables("表A").Compute("max(第一列)") |
| -- 作者：coolbhb -- 发布时间：2014/9/19 15:21:00 -- 帮忙看下第四行代码，哪里出的问题？ Dim cmb As WinForm.ComboBox cmb = Forms("窗口1").Controls("ComboBox1") cmb.ComboList = DataTables("年度应收").GetComboListString("供热年度", "客户编号 = \'" & Tables("客户信息").Current("客户编号") & "\'") e.Form.Controls("ComboBox1").Text = DataTables("年度应收").compute("max("供热年度")" , "客户编号 = \'" & Tables("客户信息").Current("客户编号") & "\'") |
| -- 作者：有点甜 -- 发布时间：2014/9/19 15:26:00 -- e.Form.Controls("ComboBox1").Text = DataTables("年度应收").compute("max(供热年度)" , "客户编号 = \'" & Tables("客户信息").Current("客户编号") & "\'") |