VSFlexGrid1内如何求最大值、最小值？

VSFlexGrid1内如何求最大值、最小值？（举例如下：）

ID     第1列     第2列     第3列     第4列    ...
1        5        10         E         8
2        B        8                    12
3        7                   ku        16
4        1        dd         2         19.
.
.
MAX:  Text1.text = 19 
MIN:  Text2.text = 1 
注：1.以上不连接数据库（不需要返回数据库记录集）
    2.数据表内存在空格、字符、数字 --------------------编程问答-------------------- 遍历呀。 --------------------编程问答-------------------- Dim 字符账号量 As Long, 英文账号量 As Long, 空格数 As Long, 最小数字 As Long, 最大数字 As Long
CountVsFlexGridMaxMin VSFlexGrid1, 1, 7, 2, 3, 字符账号量, 英文账号量, 空格数, 最小数字, 最大数字
MsgBox "字符账号量=" & 字符账号量 & vbCrLf & "英文账号量=" & 英文账号量 & vbCrLf & "空格数=" & 空格数
MsgBox "最小值=" & 最小数字 & ",最大值=" & 最大数字

VB函数工具下载,http://www.taobaosoft.com/netvb.zip

补充：VB ,  控件