[VB6] sistemistica

[viviana75]

Salve

Avrei bisogno di alcuni spunti, per creare un programma, che svolga
procedure per creare sistemi per il gioco del totogol, lotto ecc..
I punti oscuri, riguardano ad esempio, dati 20 numeri creare le combinazioni a garanzia del 6 ecc....

Quindi prima di avventurarmi volevo sapere se qualcuno di voi, a mai
fatto qualcosa di analogo, e magari potevo vedere qualche parte di codice.

grazie

[jjjjjj]

n=20
b = 1
For i = 1 To n - 1

For j = i + b To n
For k = j + b To n
For y = k + b To n
For h = y + b To n
For w = h + b To n

List1.AddItem CStr(i) & "-" & CStr(j) & "-" & CStr(k) & "-" & CStr(y) & "-" & CStr(h) & "-" & CStr(w)


next
next
next
next
next
next