摘要: iUBound1 Then For i = 0 To iUBound2 If StrComp(i, sValue, bCompare)0 Then k = k + 1 ReDim Preserve aTmpArray(iUBound1, k) For j = 0 To i... 阅读全文
posted @ 2008-03-12 13:22 pboy2925 阅读(126) 评论(0) 推荐(0)