vbs的sort排序
摘要:FunctionfSortArray(aSortThisArray)DimoArrayList,iElementSetoArrayList=...
FunctionfSortArray(aSortThisArray)
DimoArrayList,iElement
SetoArrayList=CreateObject("System.Collections.ArrayList")
ForiElement=0ToUBound(aSortThisArray)
oArrayList.AddaSortThisArray(iElement)
Next
oArrayList.Sort
setfSortArray=oArrayList
EndFunction
myarray=Array(50,20,30)
MsgBoxmyarray(0)
MsgBoxfSortArray(myarray)(0)
'CreateObject("System.Collections.ArrayList")调用了mscoree.dll,是.NETFramework相关组件。
【vbs的sort排序】相关文章:
★ 用vbs实现的一款Worm.Win32.VB.fw病毒专杀
上一篇:
vbs选择文件夹效果代码