UserControl

Hola Diego:

Si bien puedes definir propiedades con una variable pública como lo estás
haciendo, no es una manera que te permita acceder a mucha funcionalidad. La
manera mejor de hacerlo es definiendo procedimientos Get y Let/Set por cada
propiedad y asignar los valores a una variable privada del usercontrol.

Por ejemplo:

Private mPropiedad1 as String

Public Property Let Propiedad1 (ValorNuevo as String)
mPropiedad1 = ValorNuevo
End Property

Public Property Get Propiedad1() as String
Propiedad1= mPropiedad
End Property

De manera que en el prodedimiento Let puedes agregar el código que quieras,
por ejemplo:

Public Property Let Propiedad1 (ValorNuevo as String)
mPropiedad1 = ValorNuevo
Label1.Caption = ValorNuevo
End Property

Saludos,
Javier

"Diego" escribió en el mensaje
news:%

Hola todos...

Tengo una pregunta, estoy desarrollando un control y resulta que le asigno
una propiedad, por ejemplo:

Public Propiedad as boolean

Y esa propiedad se la tengo que pasar a un control que está dentro del
UserControl, y no encuentro un evento que la pase de inmediato.

¿¿Existe una forma de pasar esta propiedad directamente al objecto que

tengo

dentro del UserControl??

Muchas gracias desde ya

Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.501 / Virus Database: 299 - Release Date: 14/07/2003

"Diego" escribió:

estoy desarrollando un control y resulta que le asigno
una propiedad, por ejemplo:

Public Propiedad as boolean

Hola, Diego:

Eso no es la declaración de una propiedad; es la declaración de una variable
«Public» tipo «Boolean».

Para declarar un procedimiento «Property» tendrás que utilizar la siguiente
sintaxis, dependiendo si deseas que la propiedad sea de sólo lectura o de
lectura/escritura:

Private m_Propiedad as Boolean

' Devuelve el valor de la propiedad
Public Property Get Propiedad() As Boolean
Propiedad = m_Propiedad
End Property

' Asignamos el valor de la propiedad
Public Property Let Propiedad(ByVal vNewValue As Boolean)
m_Propiedad = vNewValue
End Property

Y esa propiedad se la tengo que pasar a un control que está dentro del
UserControl, y no encuentro un evento que la pase de inmediato.

Si por ejemplo, dentro de tu «UserControl» tienes un control «TextBox» y
deseas impedir que se pueda modificar el texto del mismo, le pasarías la
propiedad de la siguiente manera:

Private Sub UserControl_Initialize()

' Asignamos la propiedad
m_Propiedad = True

' Se la pasamos al control
Text1.Locked = m_Propiedad

End Sub

No sé si mi respuesta satisface tu petición.

Un saludo.

Enrique Martínez
[MS MVP - VB]

Gracias muchachos!!

Funciona perfecto


"Diego" escribió en el mensaje
news:%

Hola todos...

Tengo una pregunta, estoy desarrollando un control y resulta que le asigno
una propiedad, por ejemplo:

Public Propiedad as boolean

Y esa propiedad se la tengo que pasar a un control que está dentro del
UserControl, y no encuentro un evento que la pase de inmediato.

¿¿Existe una forma de pasar esta propiedad directamente al objecto que

tengo

dentro del UserControl??

Muchas gracias desde ya