ayuda con formulario.

[nelsonv]

hola. necesito ayuda. tengo por ejemplo dos formularios entonce, uno esta en toda la pantalla y el otro solo ocupa sierta parte de la pantalla, lo que quiero esq cuando aplasto un boton del primer formulario aparesca el segundo formulario y que se deshabilite el primer, al primero ya le deshabilite todos lo botones y todo, pero queria ver si hay como que aparte de que se deshabilite los botones se pueda cambiar de color a todo el formulario osea como que baje un poco su color para que paresca q esta inactico y sobresalga el segundo form. si no me explico bien es mas o menos como cuando se cierra la sesion en el foro se opaca toda la pantalla y se abre esa de la pregunta de que si quiere salir.
si saben como puedo hacer esto agradeceria mucho. gracias por las respuestas

[Insomnia]

Hola

Puedes abrir el form2 en modo modal, de esta forma no te dejara volver al form1 hasta que cierres el form2. En el botón que abre el form2 puedes poner lo siguiente:

Código:

Private Sub Command1_Click()
    
    Form2.Show 1
    
End Sub

--Saludos--

[nelsonv]

Iniciado por Insomnia

Hola

Puedes abrir el form2 en modo modal, de esta forma no te dejara volver al form1 hasta que cierres el form2. En el botón que abre el form2 puedes poner lo siguiente:

Código:

Private Sub Command1_Click()
    
    Form2.Show 1
    
End Sub

--Saludos--

lo que pasa esq quiero ver si hay como que el primer formulario cambien su color a un poco mas opaco para que aparente estar inactivo.
es igual a como se cierra la sesion aqui en el foro.

[Avellaneda]

Iniciado por nelsonv

lo que pasa esq quiero ver si hay como que el primer formulario cambien su color a un poco mas opaco para que aparente estar inactivo.
es igual a como se cierra la sesion aqui en el foro.

Prueba a ver si te sirve esto:

<En el primer formulario>

Código:

Private Sub Command1_Click()
Dim i As Integer
For i = 0 To Me.Controls.Count - 1
    Me.Controls(i).Enabled = False
Next
Me.Enabled = False
Me.BackColor = &H8000000B
Form2.Show vbModal, Me
End Sub

<Al cerrar el segundo formulario>

Código:

Private Sub Form_Unload(Cancel As Integer)
Dim i As Integer
For i = 0 To Form1.Controls.Count - 1
    Form1.Controls(i).Enabled = True
Next
Form1.Enabled = True
Form1.BackColor = &H8000000F
End Sub

[nelsonv]

Iniciado por Avellaneda

Prueba a ver si te sirve esto:

<En el primer formulario>

Código:

Private Sub Command1_Click()
Dim i As Integer
For i = 0 To Me.Controls.Count - 1
    Me.Controls(i).Enabled = False
Next
Me.Enabled = False
Me.BackColor = &H8000000B
Form2.Show vbModal, Me
End Sub

<Al cerrar el segundo formulario>

Código:

Private Sub Form_Unload(Cancel As Integer)
Dim i As Integer
For i = 0 To Form1.Controls.Count - 1
    Form1.Controls(i).Enabled = True
Next
Form1.Enabled = True
Form1.BackColor = &H8000000F
End Sub

Muchas gracias funciono como queria.
Gracias por la respuesta desde que estoy en el foro es la primera respuesta que me ayudo como yo queria.
Chaos y nuevamente gracias.