Habilitar boton desde otro form

Carlos,

Sucede que al FrmBuscaDemanda que haces referencia en tu procedimiento
btnSalir_Click no esta apuntando a tu FrmBuscaDemanda original, este a
perdido simplemente la referencia.

Has lo sgte.:

En FrmDemanda
Create una variable publica (o propiedad, en este caso usaremos una
variable, pero la forma correcta seria como propiedad)

Public myFrmBuscaDemanda As FrmBuscaDemanda

Private Sub btnSalir_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnSalir.Click
If mbNuevaDemanda = True Then

myFrmBuscaDemanda.btnNuevo.Enabled = True
End If
Me.Close()
End Sub

En FrmBuscaDemanda

Private Sub btnNuevo_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnNuevo.Click
Me.btnNuevo.Enabled = False
Dim loForm As New FrmDemanda
loForm.MdiParent = Me.MdiParent
loForm.NuevaDemanda = True 'Propiedad Publica

' Aca haces la referencia a tu formulario original
loForm.myFrmBuscaDemanda = Me

loForm.Show()
End Sub

Saludos...

On Oct 9, 4:22 pm, "J. Carlos Herrero" wrote:

Hola:
Tengo un form (FrmBuscaDemanda) con un boton
(btnNuevo) con la propiedad Modifiers=Public
desde donde se llama a otro form (FrmDemanda),
los 2 form son hijos de un form MDI (FrmMdiPrincipal)

'Desde FrmBuscaDemanda
Private Sub btnNuevo_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnNuevo.Click
Me.btnNuevo.Enabled = False
Dim loForm As New FrmDemanda
loForm.MdiParent = Me.MdiParent
loForm.NuevaDemanda = True 'Propiedad Publica
loForm.Show()
End Sub
Si veo el FrmBuscaDemanda.btnNuevo esta deshabilitado (Correcto)

'Desde FrmDemanda
Private Sub btnSalir_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnSalir.Click
If mbNuevaDemanda = True Then
FrmBuscaDemanda.btnNuevo.Enabled = True
End If
Me.Close()
End Sub
El boton Nuevo sigue deshabilitado

¿Como se puede habilitar el boton btnNuevo?

Un saludo desde Bilbo
Carlos

Hola:
Hice la prueba con una propiedad publica
y funciona perfectamente.

Muchas gracias por la ayuda
Un saludo desde Bilbo
Carlos
"neualex" escribió en el mensaje
news:
Carlos,

Sucede que al FrmBuscaDemanda que haces referencia en tu procedimiento
btnSalir_Click no esta apuntando a tu FrmBuscaDemanda original, este a
perdido simplemente la referencia.

Has lo sgte.:

En FrmDemanda
Create una variable publica (o propiedad, en este caso usaremos una
variable, pero la forma correcta seria como propiedad)

Public myFrmBuscaDemanda As FrmBuscaDemanda

Private Sub btnSalir_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnSalir.Click
If mbNuevaDemanda = True Then

myFrmBuscaDemanda.btnNuevo.Enabled = True
End If
Me.Close()
End Sub

En FrmBuscaDemanda

Private Sub btnNuevo_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnNuevo.Click
Me.btnNuevo.Enabled = False
Dim loForm As New FrmDemanda
loForm.MdiParent = Me.MdiParent
loForm.NuevaDemanda = True 'Propiedad Publica

' Aca haces la referencia a tu formulario original
loForm.myFrmBuscaDemanda = Me

loForm.Show()
End Sub

Saludos...