Uso de Propiedades en los Formularios

Quiza algo que esta a nuestra disposicion y que en ciertos momentos puede resultarnos util, es el crear propiedades en los formularios que utilizamos, puesto que los formularios son Clases, se puede crear las propiedades que querramos, el uso de las propiedades se puede emplear cuando tengamos talves que pasarle un valor a un formulario, proveniente de uno previo, y despues mostrarlo en una etiqueta o hacer algun proceso con dicho valor


Public Class Form1
'Aqui declaramos el miembro de la clase, que simplemente es una variable
Private Valor_Propiedad As String
'Definimos sus métodos Get y Set, para almacenar el valor y para poder mostrarlo
Public Property Valor() As String 'La propiedad debe llamarse diferente al miembro
Get
return Me.Valor_Propiedad 'Aqui regresa lo que tenga el miembro de la clase
End Get
Set(ByVal value As String)
Me.Valor_Propiedad=value 'Aqui se almacena el valor que se le asigne
End Set
End Property
End Class

Bien y cuando hagamos refrerencia al formulario hariamos algo asi:
'Para Almacenar el valor de la propiedad
Dim MyForm as New Form1
MyForm.Valor="Saludos a todos!!!" 'Aqui le pasamos el valor
MyForm.Show

'Para Leer el valor de la propiedad
Datos=MyForm.Valor 'Aqui leemos el valor

Las propiedades tambien se pueden definir como solo lectura con el modificador: ReadOnly

Private Valor="Este valor es de solo Lectura"
Public ReadOnly Property Solo_Lectura()
Get
Return Valor
End Get
End Property