Hola a todos, estoy practicando nuevamente visual
y me metí con clases, a conocer un poco más de ellas ... mire un tutorial pero no entiendo porque no puedo usar la funcion SET, me tira
Tengo form1:
Código vb:
Ver originalOption Explicit
Dim asco As New cNombre
Set asco = New cNombre
Private Sub Form_Load()
asco.Nombre = "Guillermo"
asco.AñoNacimiento = 1957
'Para mostrar la edad de este cuarentón, haremos:
MsgBox asco.Nombre & " tiene " & asco.Edad & " años..."
End
End Sub
cNombre (clase)
Código vb:
Ver originalOption Explicit
Public Nombre As String
Public AñoNacimiento As Integer
Public Function Edad() As Integer
Edad = Year(Now) - AñoNacimiento
End Function
me tira "error de compilacion, procedimiento no valido" y me marca SET de form1.
Leí por ahi que hay que instanciar con set la clase si o si para no ocacionar malos entendidos en memoria, pero nosé porque sale ese error ...
¿Por que sucede? (Si le saco el SET funciona, pero no es aconsejado)