以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]根据第一列值提取最大值和最新值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=180104)

--  作者:miaoqingqing
--  发布时间:2022/9/28 12:14:00
--  [求助]根据第一列值提取最大值和最新值
[求助]根据第一列值提取最大值和最新值
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:根据第一列值提取最大值和最新值.zip


--  作者:有点蓝
--  发布时间:2022/9/28 13:40:00
--  
Dim s As String = "12345"
Dim min As String = "9"
Dim max As String = "0"
For Each c As Char In s
    If c < min Then min = c
    If c > max Then max = c
Next
MsgBox(min)
MsgBox(max)

--  作者:miaoqingqing
--  发布时间:2022/9/30 19:41:00
--  回复:(有点蓝)Dim s As String = "12345"Dim min A...
蓝总,如果最小两个值相减,代码怎么写?
祝国庆节快乐

--  作者:有点蓝
--  发布时间:2022/10/4 8:40:00
--  
把字符拆分放到集合里:http://www.foxtable.com/webhelp/topics/0217.htm
按集合排序后取最末的2个值处理