[Visual Basic] Send Some Dang Keys To Background Programmer

Hi mọi người. Tối nay HungCoder.Com sẽ hướng dẫn cho mọi người một thử thuật cực hay cho AE trong giới coder thiệt lập cho chương trình mình viết có phím tắt để hiển thị hoặc có những tùy biến khác nhau cho người dùng.

Nhìn lên hình ảnh trên, các bạn cũng không thấy có gì khó rồi chứ, nó đơn giản từ những dòng code đó :D

FULL CODE :

Dim appID As Integer
    Dim APPdir As String = """C:\Program Files\Google\Chrome\Application\chrome.exe"" www.hungcoder.com"  ' Directorio del navegador + URL del sitio web
    Private Sub hungcoder()
        Try
            Dim appID As Integer
            appID = Shell(APPdir, AppWinStyle.NormalFocus, True, 100000) ' abre el navegador y espera 1 minuto para presionar la tecla f12. eso es para que cargue completamente la pagina
            AppActivate(appID)
            My.Computer.Keyboard.SendKeys("{F12}") 'Presiona la tecla f12 puedes conseguir los demas codes de teclas en https://msdn.microsoft.com/es-es/library/system.windows.forms.sendkeys.send(v=vs.110).aspx
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        hungcoder()
    End Sub

DOWNLOAD DEMO

DOWNLOAD

Chúc các bạn thành công với thủ thuật đơn giản này.