关于求数组的最大值语句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)