Questo topic e' stato chiuso dal moderatore.
03/08/10 10:15
nostradamus1915
Ciao a tutti, sto provando a creare un array di oggetti in VB 2008. Vi spiego come ho fatto:
1. Ho creato una nuova classe di nome pezzo
Public Class pezzo
Public x, y, tipo As Integer
Public alive As Boolean
Public move(8, 8) As Boolean
Public colour As Char
End Class
2. Ho dichiarato le variabili globali all'interno del modulo
Module mod
Public vmpb(2, 8) As pezzo
Public vmpn(2, 8) As pezzo
Public scacc As scacchiera
End Module
3. Infine ho eseguito le diverse operazioni di assegnazione nel form
Dim i, k As Integer
For i = 1 To 2
For k = 1 To 8
vmpb(i, k).alive = True
vmpn(i, k).alive = True
vmpb(i, k).colour = "b"
vmpn(i, k).colour = "n"
vmpb(i, k).x = i
vmpb(i, k).y = k
vmpn(i, k).x = i + 7
vmpn(i, k).y = k
Next
Next
Il problema si verifica quando eseguo il programma. Infatti mi viene richiesto di inserire new affianco alla dichiarazione dell'oggetto, quindi Public vmpb(2, 8) As NEW pezzo, ma, quando vado ad apportare la modifica, mi dice che per un array non può essere usata l'istruzione new. Come posso fare? Spero possiate aiutarmi, grazie.
1. Ho creato una nuova classe di nome pezzo
Public Class pezzo
Public x, y, tipo As Integer
Public alive As Boolean
Public move(8, 8) As Boolean
Public colour As Char
End Class
2. Ho dichiarato le variabili globali all'interno del modulo
Module mod
Public vmpb(2, 8) As pezzo
Public vmpn(2, 8) As pezzo
Public scacc As scacchiera
End Module
3. Infine ho eseguito le diverse operazioni di assegnazione nel form
Dim i, k As Integer
For i = 1 To 2
For k = 1 To 8
vmpb(i, k).alive = True
vmpn(i, k).alive = True
vmpb(i, k).colour = "b"
vmpn(i, k).colour = "n"
vmpb(i, k).x = i
vmpb(i, k).y = k
vmpn(i, k).x = i + 7
vmpn(i, k).y = k
Next
Next
Il problema si verifica quando eseguo il programma. Infatti mi viene richiesto di inserire new affianco alla dichiarazione dell'oggetto, quindi Public vmpb(2, 8) As NEW pezzo, ma, quando vado ad apportare la modifica, mi dice che per un array non può essere usata l'istruzione new. Come posso fare? Spero possiate aiutarmi, grazie.
aaa