**Holas Infromáticos de UJ
Tengo un problema con una Función Veran estoy hacindo un GM tool Pero tengo un problema al Hacer que el programa escriba los Comandos.
De por si funciona pero yo quiero que el progrma Haga esto , al darle al Botón de dicho Comando quiero que se oculte programa y Luego aparesca el programa cuando termine de Escribir el comando
lo eh puesto asi
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
Timer1.Interval = 400
Me.Hide()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
SendKeys.Send("{enter}")
SendKeys.Send("/go b1")
SendKeys.Send("{enter}")
Timer1.Stop()
Me.Show()
End Sub
y lo que hace es que se vuelve loco y se oculta y aparece varias veces y escribe mal el Comando solo me escribe bien el comando sin ponerle la funcion del ocultarse y aaparacerse, aparte peta el pc no deja ahcer nada porque aparece y desaparece rapidamente y escribiendo al mismo tiempo :facepalm: :icon_cry2: :icon_cry2: :icon_cry2:
Eh puesto tambíen la Función Asi
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
Timer1.Interval = 400
Me.Hide()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Timer1.Interval = 400 Then
SendKeys.Send("{enter}")
SendKeys.Send("/go b1")
SendKeys.Send("{enter}")
End If
Timer1.Stop()
Me.Show()
End Sub
y sigue haciendo lo mismo algunas ayuda :icon_cry2: :icon_cry2: **