Visual Basic 6 - calcolare conbinazioni

salve sono roberto,
vorrei sapere come posso calcolare conbianzioni
avendo un cmdcalcola un listbox e una txtbox.
Cioe'ho dieci squadre inserite nella listbox, per ogni squadra mi deve calcolare le G e N, inserendo conbinazioni da uno a 10 nella text.
La listbox poi mi deve visualizzare le conbinazioni cliccando sul cmdcalcola.
Spero di essere stato chiaro.
ciao a presto.

1) NON FACIIAMO PROGRAMMI SU BLA bla bla..
tanto ormai si sa l'abbiamo detto migliaia di volte.

detto questo intendi fare un programma di calcolo combinatorio o cosa? non penso di aver capito esattamente.

neanch'io ho capito...

vorrei che invece dei numeri mi visualizzasse G invece di 0 e n invece di 1
Private Sub cmdCalcola_Click()
For i1 = 0 To 1
For i2 = 0 To 1
For i3 = 0 To 1
For i4 = 0 To 1
For i5 = 0 To 1
For i6 = 0 To 1
For i7 = 0 To 1
For i8 = 0 To 1
For i9 = 0 To 1
For i10 = 0 To 1
ListBox1.AddItem CStr(i1) + CStr(i2) + CStr(i3) + CStr(i4) + _
CStr(i5) + CStr(i6) + CStr(i7) + CStr(i8) + CStr(i9) + CStr(i10)
Next i10
Next i9
Next i8
Next i7
Next i6
Next i5
Next i4
Next i3
Next i2
Next i1
Text1.Text = ListBox1.ListCount
End Sub

Se qualcuno ha capito me lo spiegasse

non ho capito, puoi spiegarti meglio?

ma perchè usa 10 cicli?

Forse intendi sostituire gli 0 con gli 1,e allora si fà così mi pare :

risultato = replace (risultato,"Parola da sostituire","parola sostituita")
risultato = replace (risultato,"1","G")