DUDA CON UN EVENTO DEL MOUSE
Que hay que hacer para que cuando pasas el raton por encima de una imagen (por ej.) aparecca otro form, y cuando quites el raton de encima de la imagen, se cierre solo el form que aparecio???
MUCHAS GRACIAS
MUCHAS GRACIAS
Bien... pues no me imagino para que lo quieres pero checa el siguiente codigo...
Crea un nuevo proyecto Exe estandar, insertale un control CommandButton, inserta otro formulario y copea el siguiente codigo en la seccion (General) (Declaraciones) del form1... ejecutalo...
Private Sub Form_Load()
Load Form2
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Form2.Visible = True Then
Form2.Visible = False
End If
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Form2.Visible = False Then
Form2.Visible = True
'Puedes quitarle a siguiente linea
Form2.Move Form1.Left + Form1.Width, Form1.Top
End If
End Sub
Private Sub Form_Unload(Cancel As Integer)
Unload Form2
End Sub
Bueno... pues aqui esta ha ver si es esto lo que querias que hiciera tu programa...
Crea un nuevo proyecto Exe estandar, insertale un control CommandButton, inserta otro formulario y copea el siguiente codigo en la seccion (General) (Declaraciones) del form1... ejecutalo...
Private Sub Form_Load()
Load Form2
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Form2.Visible = True Then
Form2.Visible = False
End If
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Form2.Visible = False Then
Form2.Visible = True
'Puedes quitarle a siguiente linea
Form2.Move Form1.Left + Form1.Width, Form1.Top
End If
End Sub
Private Sub Form_Unload(Cancel As Integer)
Unload Form2
End Sub
Bueno... pues aqui esta ha ver si es esto lo que querias que hiciera tu programa...
