VB.NET 다른 응용 프로그램 창에 Tab 키 보내기

Question

"{TAB}"키를 다른 응용 프로그램에 보내려합니다. 창 (키를 텍스트 상자가 아닌 창으로 보냅니다).

내가 시도 :

SendMessage(hWnd, WM_SETHOTKEY, VK_TAB, 0) 

아무 일도하지 않습니다.
내 목표는 : 내 응용 프로그램 또는 다른 응용 프로그램에
보내기 탭 키를 눌러 응용 프로그램 창은 초점 하지 때.
나는 많은 시도를하고 난 항상 같은 반환

(나는 sendkey 선택의 여지가 (이 내가 그것을 사용하고 처음입니다.)이없는이 경우 전문 아니라는 것을 알고) 결과 :

아무 일도 없었습니다.

답변을 알고 있습니까?

Answer 1

다른 창을 먼저 활성화해야합니다. Change focus to another window in VB.NET을 확인하십시오. 다음 보내기 키를 사용하십시오.

Answer 2

몇 시간 전에 이런 종류의 문제로 고생하고 있었지만, 나는 살펴볼 몇 가지 제안을했습니다.

1은 autoit이며 vb.net에서 참조 할 수있는 dll을 포함하고 있으며 매우 간단하며 잘 설명되어 있습니다. 나는 제 3 자 프로그램을 통제 할 필요가있을 때마다 그것을 사용하는 경향이 있습니다.

다른 하나는 ui automation classes 는 예를 들어이보기입니다 :

http://blog.functionalfun.net/2009/06/introduction-to-ui-automation-with.html

Answer 3

SendKeys 당신이 활성화 될하기 위해 키를 전송하는 응용 프로그램이 필요합니다. 위의 링크에서

:

사용 SendKeys 매크로는 활성 응용 프로그램에 키 입력 및 키 입력 조합을 보낼 수 있습니다.

이 제한 사항을 해결하려면 WinApi 기능을 사용해야합니다.

,617 :

1. FindWindowpInvoke.net
2. FindWindowExpInvoke.net
3. sendMessagepInvoke.net

는 여기서 예

이 MSDN Forum Post보기는 전기의 변형 예

Public Class Form1 
    Declare Function FindWindow Lib "user32" Alias "FindWindowA" _ 
        (ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr 
    Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _ 
        (ByVal hWnd As IntPtr, ByVal hWndChildAfterA As IntPtr, ByVal lpszClass As String, ByVal lpszWindow As String) As IntPtr 
    Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ 
        (ByVal hWnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As IntPtr, ByVal lParam As String) As IntPtr 
    Const WM_SETTEXT As Integer = &HC 

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
     Dim destination As IntPtr = FindWindow(Nothing, "Untitled - Notepad") 
     Dim destControl As IntPtr = FindWindowEx(destination, IntPtr.Zero, "Edit", Nothing) 
     SendMessage(destControl, WM_SETTEXT, IntPtr.Zero, "Hello" & vbTab & "GoodBye" & vbCrLf) 

    End Sub 

End Class 

---

은 추가는 WM_KEYDOWN를 사용하여 추가 예 나는 TestForm로 설정 창 제목에 또 다른 작은 응용 프로그램을 만들고 응용 프로그램이 TabKey을 가지고 있는지 확인하기 위해의 WndProc 메소드를 오버라이드.

Public Class Form1 

    Declare Function FindWindow Lib "user32" Alias "FindWindowA" _ 
       (ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr 
    Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ 
       (ByVal hWnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As IntPtr 
    Const WM_KEYDOWN As Integer = &H100 
    Const VK_TAB As Integer = &H9 

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

     Dim destination As IntPtr = FindWindow(Nothing, "TestForm") 
     SendMessage(destination, WM_KEYDOWN, VK_TAB, 0) 

    End Sub 

End Class 

시험 양식

양식

보내기

는

MyBase.WndProc (m)에 중단 점을 넣고 전송 된 내용을 볼 수 m 봐.

Public Class Form1 

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message) 
     MyBase.WndProc(m) 
    End Sub 

End Class