Propiedades Personalizadas en vb.net
Publicado por roberto (9 intervenciones) el 23/11/2021 15:13:11
Buenas amigos del Foto, quisiera ayuda de parte de ustedes con un aspecto sencillo creo pero no me funciona.
he creado u formulario en vb.net 2012, con una propiedad personalizada para usarlo en otro form, pero no estoy viendo, les paso el codigo:
Form que contiene la propiedad
Public Class FrmArqueos
Private _ok As Boolean = False
/*Esta es la propiedad personalizada que le agrege*/
Public Property retorno() As Boolean
Get
Return _ok
End Get
Set(value As Boolean)
_ok = value
End Set
End Property
end class
/**form llamador **/
Public Class FrmCajas
Private f As Form
Private Sub Btn_cerrar_Click(sender As Object, e As EventArgs) Handles Btn_cerrar.Click
Try
f = New FrmArqueos()
f.ShowDialog()
If f.retorno Then ---Esta linea no me funciona, porque no ve la propiedad
Catch ex As Exception
MsgBox("Error al Cerrar cajas " & ex.Message)
Exit Sub
End Try
end sub
end class
Me parece sencillo, pero no puedo ver la propiedad retorno que cree en(frmArqueos) desde el form FrmCajas,
Espero me ayuden..
Saludos
he creado u formulario en vb.net 2012, con una propiedad personalizada para usarlo en otro form, pero no estoy viendo, les paso el codigo:
Form que contiene la propiedad
Public Class FrmArqueos
Private _ok As Boolean = False
/*Esta es la propiedad personalizada que le agrege*/
Public Property retorno() As Boolean
Get
Return _ok
End Get
Set(value As Boolean)
_ok = value
End Set
End Property
end class
/**form llamador **/
Public Class FrmCajas
Private f As Form
Private Sub Btn_cerrar_Click(sender As Object, e As EventArgs) Handles Btn_cerrar.Click
Try
f = New FrmArqueos()
f.ShowDialog()
If f.retorno Then ---Esta linea no me funciona, porque no ve la propiedad
Catch ex As Exception
MsgBox("Error al Cerrar cajas " & ex.Message)
Exit Sub
End Try
end sub
end class
Me parece sencillo, pero no puedo ver la propiedad retorno que cree en(frmArqueos) desde el form FrmCajas,
Espero me ayuden..
Saludos
Valora esta pregunta


0