[VB.NET]Problema banale programmazione visuale

[Giuseppe214]

Salve a tutti...Sto usando da 2 giorni com microsoft access le maschere e facendo le routine in Vb ho trovato un problema.Ho 3 numeri e devo ordinarli in modo crescente.Per l'array in C++ facevo

comodo=array[i];
array[i] = array[i+1];
array[i+1] = comodo;

e in vb come si fa?

Grazie

[© Rocky]

Ciao Giuseppe,
Se ti può servire, questo è un modo ma, ce ne sono altri.

Function BSort(s As String) As String

Dim arr As Variant
Dim Swap As Boolean
Dim c As String
Dim i As Integer

arr = Split(s, ".")
i = 0
Swap = True
Do
    Swap = False
    For i = 0 To UBound(arr) - 1
        If CInt(arr(i)) > CInt(arr(i + 1)) Then
            c = arr(i + 1)
            arr(i + 1) = arr(i)
            arr(i) = c
            Swap = True
        End If
    Next
    If Not Swap Then Exit Do
Loop

BSort = Join(arr, ".")

End Function

Ciao