首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VBA >

关于求数组的最大值语句application.max(arr)的有关问题

2013-01-21 
关于求数组的最大值语句application.max(arr)的问题例子1:ip Array(192, 168, 0, 1)k Application.Max

关于求数组的最大值语句application.max(arr)的问题
例子1:
ip = Array(192, 168, 0, 1)
k = Application.Max(ip)
返回的k值是192,结果正常。



例子2:
ip = Split("192.168.1.1", ".")
k = Application.Max(ip)
返回的k值是0,结果不正常。

请问是为什么呢?
像例子2这样,要从一组IP提取每个数字的值再获得最大值,应该怎样做?
[解决办法]


    ip = Split("192.168.1.1", ".")
    Dim ipx()
    ReDim ipx(UBound(ip))
    For i = 0 To UBound(ip)
    ipx(i) = CInt(ip(i))
    Next i
    k = Application.Max(ipx)

热点排行