例子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)