如果长度不等,那么将下面的代码:
idx = CInt(max.Substring(2,3)) + 1
改为:
idx = CInt(max.Substring(max.Length -3,3)) + 1