vbs的sort（数组排序）
摘要：
Function fSortArray(aSortThisArray)Dim oArrayList, iElementSet oArrayList = CreateObject( "System.Collections.ArrayList" )For iElement = 0 To UBound(aSortThisArray)oArrayList.Add aSortThisArray(iElement)NextoArrayList.Sortset fSortArray = oArrayListEnd Functionmyarray=Array(50,20,30)MsgBox 阅读全文
posted @ 2012-06-01 00:31 张飞_ 阅读(2879) 评论(0) 推荐(0) 编辑