[VB6] Come faccio a dare dei valori ad attributi di una classe

[morpheus81]

vi allego il codice della classe così potete aiutarmi meglio

Public codi As Integer
Public desc As String
Public bala As Integer


Public Sub insert(num, cod, des, bal)
Dim sp As Class1
Set sp = New Class1
sp.codi = cod
sp.desc = des
sp.bala = bal

Put num, 1, sp

End Sub