Cita:
Iniciado por RsOfT Estoy haciendo una aplicación orientada a objetos:
Tengo dos clases, una se llama clsCliente y otra clsDireccion.
La definición de mi clase cliente es la siguiente:
Código:
Public Class clsCliente
'--Variables de los Atributos--
Dim a_lngClienteID As Long
Dim a_strNombre As String
Dim a_strDireccion As clsDireccion
'------------------------------
#Region "Atributos"
Property ClienteID()
Get
Return a_lngClienteID
End Get
Set(ByVal Value)
a_lngClienteID = Value
End Set
End Property
Property Nombre()
Get
Return a_strNombre
End Get
Set(ByVal Value)
a_strNombre = Value
End Set
End Property
Property Direccion()
Get
Return a_strDireccion
End Get
Set(ByVal Value)
a_strDireccion = Value
End Set
End Property
#End Region
End Class No deberías poner el modificador "Public" a las propiedades que quieras que sean públicas? Y aparte, el tipo de datos de la propiedad? Uséase...
Public Property ClienteID() As String (Bueno, supongo que esta no será string
...)
[...]
End Property
Saludos!