( )22. 執行下列 Visual Basic 程式片段，輸出結果為何?
(A) 5
(B) 4
(C) 3
(D) 2

```vba
Dim Data() As Integer = (1, 4, 2, 3, 5)
Dim ChangeCount As Integer = 0
For i = 0 To UBound(Data)
For j = i + 1 To UBound(Data)
If Data(i) > Data(j) Then
Dim d As Integer = Data(i)
Data(i) = Data(j)
Data(j) = d
ChangeCount += 1
End If
Next
Next
Console.WriteLine(ChangeCount)
```

答案：登入後查看
統計： 尚無統計資料