CITAZIONE (luigibLotto @ 21/3/2021, 01:16)
esattamente ...
ora devi sostituire il valore fisso 5 con il valore che sta nella posizione 3 (inizia da 0) dell'array
gli altri numeri di conseguenza sono i successivi fino a coprire tutte le ruote e questo si fa con i cicli
il fatto che tu abbia 11 ruote e 5 estratti ti fa venire in mente come usare i cicli ? ci vorrebeb pure una variabile che piano piano si incrementa per puntare l'elemento dell'arrya frutto dello split..
Ciao Luigi,
comincia ad essere complessa la cosa, più che studio mi sa che serve proprio un corso base di programmazione VB, ma vabbè che vuoi farci, almeno ci si prova..
Dunque il valore fisso va cambiato con il valore della posizione 3, che stando allo spit valorizziamo con "av(4)".
Poi per i cicli me ne servono 2, uno per le ruote che son 11 e uno per i numeri estratti che son 5 ogni ruota, quindi
CODICE
Dim Ruota As Long
Dim Estratti As Long
Dim strctE as struct_estrazione
For Ruota = 1 To 11
For Estratti = 1 To 5
strctE.aRuote(Ruota).aNum(Estratti) = Val(4)
Next
Next
Questa parte non mi è chiara...
CITAZIONE
ci vorrebeb pure una variabile che piano piano si incrementa per puntare l'elemento dell'arriva frutto dello split..
Cioe un semplice banale contatore tipo
CODICE
Dim Contatore as Integer
Contatore = Contatore +1
Poi altra cosa non chiara per me è come comunicano i vari :
CODICE
Friend Function GetEstrazione(idEstr As Long, RetEstr As struct_estrazione) As Boolean
Function GetDataEstrazione(idEstr As Long) As String
Function GetInfoEstrazione(idEstr As Long) As String
Non capiscono come devono interagire, chi chiama chi ??
Sarà dura uscirne da soli, e so che la tua pazienza non è infinita
Ciao