【VBScript(VBS)】配列の入替にはバブルソートを使ってみよう。

スポンサーリンク

配列の入替にはバブルソートを使ってみよう。

VBScriptで配列を入れ替えたい場合、
バブルソートを用いた例をご紹介します。

バブルソートの例

▽バブルソートのプログラムコード例

Sub sortBubble(ByRef a) ' バブルソート例
    Dim n
    For n = 0 To UBound(a) - 1
        Dim m
        For m = n + 1 To UBound(a)
            If a(m) < a(n) Then
            	dim wkSort
            	wkSort = a(m)
            	a(m) = a(n)
            	a(n) = wkSort
            End If
        Next
    Next
End Sub

▽呼び出し方

Call sortBubble(aryOut)

まとめ

  • VBScriptで配列を入れ替えたいときはバブルソートを使ってみよう!
  • For文を組み合わせて実装する
  • 数値や文字列を比較して、入れ替えていこう

今回は、VBScriptで配列を入れ替えたい場合のバブルソートを用いた例をご紹介しました。

以上、「【VBScript(VBS)】配列の入替にはバブルソートを使ってみよう。」でした。

スポンサーリンク

シェアする

  • このエントリーをはてなブックマークに追加

フォローする