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排序
2021-05-22 21:21:37声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。 如涉及版权问题,请提交至online#300.cn邮箱联系删除。
热门文章