PDA

View Full Version : [VB6] problema matrice dinamica


Dark_Sephirot86
26-12-2005, 20:47
Sono da poco alle prese con le matrici dinamiche (a scuola non abbiamo fatto neanche quelle statiche...), e sno già incappato in un problema

Private Sub btm_inserisci_Click()
Dim NEquazioni As Integer
Dim I As Integer
Dim J As Integer
Dim Moltiplicatore As Integer
NEquazioni = Val(lbl_eq.Caption)
ReDim MatriceDet(1 To NEquazioni, 1 To NEquazioni) As Single
ReDim VettoreV(1 To NEquazioni) As Single
ReDim VettoreO(1 To NEquazioni) As Single
For J = 0 To NEquazioni
lst_1(J).Clear
Next J
For I = 1 To NEquazioni
For J = 0 To NEquazioni
lst_1(J).AddItem Val(InputBox("Inserisci un coefficiente"))
Next J
Next I
For I = 0 To NEquazioni - 1
For J = 1 To NEquazioni
MatriceDet(I, J) = Val(lst_1(I).List(J))
Next J
Next I
For I = 1 To NEquazioni
For J = I To NEquazioni
VettoreV = lst_1(I).List(J)
Next J
For J = I To NEquazioni
VettoreO = lst_1(J).List(I)
Next J
Next I
End Sub

*scusate, non so come mettere i codici

Chiaramente è solo una bozza. Appena lo avvio mi dice: Impossibile assegnare alla matrice, e mi evidenzia questo:
VettoreV = lst_1(I).List(J)

Che può essere?

motogpdesmo16
27-12-2005, 12:18
per mettere il codice, premi il tasto con il simbolo # che significa appunto code.
Alternativamente racchiudi il testo tra i tag
(code)

...
...
testo...
...
...
(/code)

Sostituendo alle parentesi tonde, le parentesi quadre.
Scrivi così il codice perchè altrimenti, almeno io, senza indentazione, non riesco a capirci molto.

Dark_Sephirot86
27-12-2005, 12:45
grazie fatto

motogpdesmo16
27-12-2005, 13:11
cosa è : lst_1??

Dark_Sephirot86
27-12-2005, 14:22
E' una matrice di controlli di listbox