
Originariamente inviata da
giuseppe500
non ci avevo pensato, grazie 1000!!.
scusa ma non ci salto fuori come faccio con un solo for a farne 3 o a4 o 5 o n?
io ho provato cosi:
codice:
Private Function recFor(num As Integer, lofMax As List(Of Integer), loRes As List(Of Integer), loall As List(Of List(Of Integer)), listidx As List(Of Integer))
Dim i As Integer
If num < 4 Then
For i = listidx(num) To lofMax(num)
If num >= 4 Then
num = 0
End If
loRes.Add(i)
listidx(num) = i
If loRes.Count Mod 4 = 0 And loRes.Count - 1 <> 0 Then
loall.Add(loRes)
loRes = New List(Of Integer)
num = 0
End If
num += 1
Next
recFor(num, lofMax, loRes, loall, listidx)
End If
End Function
e pensavo di ricevere una serie (lista di n elementi) di 4 int cosi : 0 0 0 1 - 0 0 0 2 - 0 0 0 3 - 0 0 0 4 - 0 0 1 0 - 0 0 1 1 ecc...
ma penso di aver sbagliato tutto sig
non riesco a capire come annidare form in una funzione ricorsiva.
mi puoi dare un aiuto?
grazie.ciao