ho fatto cosi' senza rimettermi a scrivere moltissime cose...
dim RStrObj(1000)
o = 0
RStrObj(o) = "a" : o = o + 1
RStrObj(o) = "b" : o = o + 1
RStrObj(o) = "c" : o = o + 1
RStrObj(o) = "d" : o = o + 1
RStrObj(o) = "e" : o = o + 1
RStrObj(o) = "f" : o = o + 1
RStrObj(o) = "g" : o = o + 1
dim StrObj(o) ' <-- Riga incriminata
For k=0 to o
StrObj(k) = RStrObj(k)
Next
Si ma mi dice... Errore e che devo specificare per il dim un valore numerico intero o_O quello gesu e' intero :P
la mia o nella fattispecie nel codice originale vale 45 ho provato a printarla..
hem expected integer constant o_O ma deve essere costante per forza il valore???


Rispondi quotando