[VB6] Come chiamare un metodo

[morpheus81]

Ciao a tutti, premetto che sono un newbie di VB, però sono bravo in java e c++, ho creato un classe chiamata class1

Private Sub Form_Load()
Open "spese.lol" For Random As #1 Len = 100
Dim spese As Class1
spese.insert (1, 1, "dd", 1000)

End Sub

la chiamata è riferita alla class1 che metto qui sotto

Public cod As Integer
Public des As String
Public bal As Integer
Public Sub insert(num, cod, des, bal)
Dim usa As Class1
usa.cod = cod
usa.des = des
usa.bal = bal
Put num, 1, usa


End Sub

Perchè mi da l'errore sulla chiamata.
grazie ciao

[morpheus81]

Ovviamente sopra è sbagliato gli attributi della classe sono tutti privati.
cmq mi da un errore di sintassi.

[xegallo]

perchè hai dichiarato un oggetto del tipo class1

Dim spese As Class1

ma non l'hai ancora istanziato

dovresti mettere anche

set spese = new class1

in questa maniera spese diventa una nuova istanza della classe class1 oppure se fai riferimento ad una istanza precedente

set spese = altra istanza

solo dopo aver istanziato l'oggetto puoi accedere alla sua interfaccia pubblica

[morpheus81]

ok grazie hai perfettamente ragione, ma quando la chiamo
spese.insert (1, 1, "dd", 100)
mi dice sempre che vuole un =
ma perchè visto che il metodo non restituisce niente.
ciao e grazie ancora

[xegallo]

Originariamente inviato da morpheus81
ok grazie hai perfettamente ragione, ma quando la chiamo
spese.insert (1, 1, "dd", 100)
mi dice sempre che vuole un =
ma perchè visto che il metodo non restituisce niente.
ciao e grazie ancora

togli le parentesi

[ladyBlu]

devi scrivere semplicemente la parolina Call prima della chiamata:

Call spese.insert (1, 1, "dd", 100)

quando una routine ha più di un parametro di input è obbligatorio scrivere Call davanti.

[morpheus81]

Grazie infinite!! byebye