Visual Basic - Como parar el efecto??

Life is soft - evento anual de software empresarial
 
Vista:

Como parar el efecto??

Publicado por Diego (3 intervenciones) el 29/07/2002 18:48:10
Con el siguient código mi programa reacciona cuando hago doble clic sobre el icono q he creado al lado del reloj de windows.

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim Result As Long
Dim msg As Long
If Me.ScaleMode = vbPixels Then
msg = X
Else
msg = X / Screen.TwipsPerPixelX
End If
Select Case msg
Case WM_LBUTTONDBLCLK
Form2.Show
End Select
End Sub

Mi objetivo es mostrar Form2 y poder trabajar con el, pero el resultado es q aparece Form2 parpadeando y sin reaccionar al los eventos del teclado hasta q no pincho sobre él con el ratón.

¿Cómo quito ese efecto y puedo cargar normal Form2?

Por favor, agradecería su ayuda.

Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como parar el efecto??

Publicado por Alvaro Marín (574 intervenciones) el 30/07/2002 08:47:03
Estimado amigo:
Prueba a llamarlo en forma modal:
Form2.Show Vbmodal
Si no te resultara una vez ejecutada la línea pásale el foco son Setfocus.
Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como parar el efecto??

Publicado por Diego (3 intervenciones) el 30/07/2002 16:24:30
Gracias Alvaro, pero no me han servido tus soluciones:

Si lo llamo en forma modal ( Form2.Show VbModal ), se hace visible el formulario pero no se queda activo.

Entonces pruebo a pasarle el foco a continuación...
(quedando el código así)
Form2.Show VbModal
Form2.SetFocus
...y en este caso sigue apareciendo el formulario inactivo, y es cuando lo descargo este, que ejecuta la linea (Form2.SetFocus) dandome error al ya no estar.

Me puedes sugerir alguna otra solución o decirme dnd sta el problema??

De nuevo gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar