|
Salve quest'oggi ho provato a implementare un array dentro un'altro senza che il tutto funzionasse mi domando se il problema fosse derivato dal seguente codice oppure da l'inutilizzo all'interno di visual basic 6
modulo :
Type DatiRam
NomeScaffale As String
OggettiScaffale(1000000000) As RamSpec
Posizione As Integer
End Type
Type RamSpec
RamId As Double
RamOggetto As String
RamPeso As double
RamData As String
RamDescrizione As Integer
End Type
Global RamMagazzino(1000) As DatiRam
form
Private Sub Command1_Click()
If RamMagazzino(1).PosizioneStaG > 0 Then
Else
RamMagazzino(1).PosizioneStaG = RamMagazzino(1).PosizioneStaG + 1 ' qui assegna quanti scaffali ci sono in memoria
RamMagazzino(RamMagazzino(1).PosizioneStaG).OggettiScaffale( ' mentre qui al primo punto dove ho inserito oggettiscaffale è entrato in modalità autocompilazione mentre successivamente quando ho aperto la parenesi non ha dato nessun riferimento all'array, bloccandomi nel proseguire di scrivere codice perché sta generando già un errore
End Sub
suggerimenti ? sicuro di un vostro riscontro porgo i miei ringraziamenti in anticipo
Ultima modifica effettuata da Aangelus il 30/04/2014 alle 17:54 | 
posso fare qualcosa per aumentare il numero dato che gli oggetti sono molto di più ?