[VB6] inserimento più valori in un flexgrid

[Giangio92]

Ciao a tutti. Ho una flexgrid di nome grid e ho bisogno di generare n numeri casuali e di inserirli in UNA cella solo. Ecco l'algoritmo:


With Me.grid
For j = 1 To ncamp 'ncamp è immesso dall'utente
.Col = 2
.Row = j

For k = 1 To amp 'amp è il num di volte che devo inserire questi
'i valori casuali nella singola cella
casuale = Int((100 - 0 + 1) * Rnd() + 0)
.Text = ????
Next k
Next j
End With

cosa dovrei mettere nel .text?
Grazie a tutti

[MarcoGG]

Ciao a tutti. Ho una flexgrid di nome grid e ho bisogno di generare n numeri casuali e di inserirli in UNA cella solo.


Stando a quello che scrivi, in .Text dovrai inserire il valore della variabile "casuale". Ma così facendo, alla fine del ciclo quella cella visualizzerà solo l'ultimo casuale generato... :stordita: