Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: Psyke1 en Septiembre 15, 2010, 11:49:22 am
-
Bueno, aqui vengo con una duda siiiiiiiiimple... :P
Estoy creando una clase.
No se porque me da error lo siguiente:
Private lColor As Long
Public Property Let Color(ByVal NewColor As Long)
lColor = NewColor
End Property
Error
Uso no válido de la propiedad
Gracias! :D
-
Dim lColor as Long
Public Property Let Color(ByVal NewColor As Long)
lColor = NewColor
End Property
Public Property Get Color() As Long
Color = lColor
End Property
Asi te da error?
-
Gracias...
Peeero, me sigue dando el mismo error o_O
Sinceramente no entiendo porque...
Mira, si hago esto, funciona bien:
Private lColor As Long
Public Sub Color(ByVal NewColor As Long)
lColor = NewColor
End Sub
DoEvents!¡
-
Pues entonces posiblemente hay algo mal en la clase y por alguna razón el error apunta allí...!
-
hola usa Set el Let creo que es par objetos no me acuerdo bien ahora para pasarte un ejemplo pero con Set para los colores esta bien.
no entendi mal, con Let esta bien, esta inicializando la clase???
-
Private lColor As Long
Public Property Set Color(ByVal NewColor As Long)
Set lColor = NewColor
End Property
Error
Las definiciones de procedimientos de propiedad para la misma propiedad son incoherentes o el procedimiento de propiedad contiene un parametro opcional Paramarray o un parametro set no valido
DoEvents! :P
-
si modifique mas arriva, y como estas declarando el GET
a mi como puso sscaann me funciona bien
-
Esque no me funciona con Let ni con Set ... :'(
Y no me es necesario obtener el color con Get (por que tengo que hacer otra propiedad con Get?)
Me sigue sin funcionar... Es extraño... ???
Voy a seguir probando y os cuento.
Gracias
DoEvents¡! :P