[VB.NET] combinazioni

[raffing]

ciao, non riesco a creare un algoritmo che mi faccia trovare il numero di combinazioni possibili tra n elementi;
per esempio un vettore di tre elementi con ogni elemento che può assumere valori da 1 a tre e con questo particolare pattern:

1: (0,0,0);
2: (0,0,1);
3: (0,0,2);
4: (0,0,3);


5: (0,1,1);
6: (0,1,2);
7: (0,1,3);


8: (0,2,2);
9: (0,2,3);


10: (0,3,3);


cioè l'elemento di destra non può mai essere piu piccolo di quello alla sua sinistra ma al più uguale;
con vb.net ho provato così:

Sub calcola()
        Dim a, b, c As Integer
        Dim count As Long
        For a = 0 To 0
            For b = a To 3
                For c = b To 3
                    
                    count = count + 1
                    
                Next
                
            Next
        Next
        MsgBox (count)
   
End Sub

è la stampa è 10, corretto!


ma come faccio se mi servono tipo combinazioni tra 20 elemetni?
non posso fare 20 cicli for!


mi date una mano? grazie


ps: sono un neofita