如何使用 VB 將鍵盤事件寫入指定的程式視窗

以下方法僅供參考。

方法一：使用 sendkeys 語句。

sendkeys "a", true '向角色傳送

方式二：使用API函式。

此方法實現起來更複雜，並為您提供乙個想法：

使用 FindWindow 查詢具有特定標題的視窗，獲取該視窗的控制代碼，並使用 SendMessage 向該視窗傳送鍵盤訊息。

declare function findwindow lib "user32" alias "findwindowa" (byval lpclassname as string, byval lpwindowname as string) as long

declare function sendmessage lib "user32" alias "sendmessagea" (byval hwnd as long, byval wmsg as long, byval wparam as long, lparam as any) as long

構建命令1. 我以計算器為例。 **如下。

private sub command1_click()dim t as long

t = shell("calc")

sendkeys "123"

end sub

以下是執行鍵盤事件的方法：

第一步是單擊“vs”工具。

第二步，開啟後，建立乙個新的 Windows 窗體應用程式。

第三步是檢視右下角窗體的屬性欄。

步驟4：雙擊鍵。

<>步驟 6 中，再次輸入 ** 並將屬性 keypreview 設定為 true。

第 7 步：執行程式，按示例 F5，會彈出提示，表示已成功獲取。

1.首先，雙擊表單的空白處，進入**視窗。

2. 然後我們在事件中找到點選事件。

3. 這時，開始編寫測試 [print]。"我正在點選該物業！ "】。

4. 然後我們開始執行測試。

5.啟動後，我們單擊表單的空白區域。

6.這時，我們將看到測試的效果。

option explicit

private sub command1_click()print

end sub

private sub form_load()text1 = "問：如何用VB書寫點選命令按鈕，表單會在文字框中顯示內容？ "

end sub