配列をソートする

配列をソートするサンプルコードです。

VBS

Set AList = CreateObject("System.Collections.ArrayList")

dim x(100)

x(0)="xxx"

x(1)="ggg"

x(2)="aaa"

x(3)="しお"

x(4)="さとうみず"

x(5)="さとう"

i=0

do while x(i)<>""

AList.Add x(i)

i=i+1

loop

AList.Sort()

i=o

For Each kaku_AList in AList

x(i)=kaku_AList

wscript.echo kaku_AList

i=i+1

Next

set AList = Nothing

コマンド:


aaa

ggg

xxx

さとう

さとうみず

しお



コマンドサンプル一覧