以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  请教问题 :取编码最大值为何不对?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=125338)

--  作者:jswjyjf
--  发布时间:2018/9/26 16:15:00
--  请教问题 :取编码最大值为何不对?
请教问题 :取编码最大值为何不对?

 msgbox(DataTables("客户").Compute("Max(客户编码)"))


表如下

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180926161348.jpg
图片点击可在新窗口打开查看



应该结果是最大值是199999 但是计算结果是999
不知道错在哪里?

--  作者:有点甜
--  发布时间:2018/9/26 16:16:00
--  
字符取最大值,规则是不同的。除非你把列改成数值列。
--  作者:jswjyjf
--  发布时间:2018/9/26 16:19:00
--  
哦 那怎么才能取字符最大值
--  作者:有点甜
--  发布时间:2018/9/26 16:22:00
--  
以下是引用jswjyjf在2018/9/26 16:19:00的发言:
哦 那怎么才能取字符最大值

 

1、可以循环每一行,转换成数值后比较;

 

2、可以把字符列改成数值列。


--  作者:jswjyjf
--  发布时间:2018/9/26 16:25:00
--  
第一个代码怎么写


--  作者:有点甜
--  发布时间:2018/9/26 16:26:00
--  
以下是引用jswjyjf在2018/9/26 16:25:00的发言:
第一个代码怎么写

 

Dim max = 0
For Each r As Row In Tables("表A").Rows
    If val(r("第一列")) > max Then
        max = val(r("第一列"))
    End If
Next
msgbox(max)


--  作者:jswjyjf
--  发布时间:2018/9/26 16:30:00
--  
谢谢 万分感谢