
Tengo form1:
Código vb:
Ver original
Option 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 original
Option 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)