如何將Text1中的文本,Tab鍵,Text2的文本,回車鍵發送到其他的程式中?
uj5u.com熱心網友回復:
發送到其他程式?也是VB寫的?如果是
你可以看看 textbox控制元件的 LinkTopic、LinkMode、LinkExecute,這幾個屬性
以及接受傳送來的 Form_LinkExecute 程序
uj5u.com熱心網友回復:
外部程式不知道是什么東西寫的?我的程式是vb的,并且是Private Sub Timer1_Timer()
SetWindowPos Me.hwnd, a, 0, 0, 0, 0, b Or c
ShowWindow Me.hwnd, SW_SHOWMAXIMIZED
End Sub
視窗前置,如何退出焦點,
發送文本,
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hWnd1 As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
Dim hWnd1As Lon
hWnd1 = FindWindow("Myexe", vbNullString)
SetForegroundWindow hWnd
Sleep 100
SendKeys Text1.Text
SendKeys "{Tab}"
endKeys Text2.Text
SendKeys "{Enter}"
End Sub
uj5u.com熱心網友回復:
Private Sub Command1_Click()
Dim hWnd1As Lon
hWnd1 = FindWindow("Myexe", vbNullString)
SetForegroundWindow hWnd1
Sleep 100
SendKeys Text1.Text
SendKeys "{Tab}"
endKeys Text2.Text
SendKeys "{Enter}"
End Sub
uj5u.com熱心網友回復:
請高手幫忙解答,謝謝了。uj5u.com熱心網友回復:
樓主這個一看就知道是做游戲登陸器的。 你直接用句柄賦值,用sendkeys不可靠的uj5u.com熱心網友回復:
api:sendmessage不過對于游戲來說,成功率不大。。。。
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/121753.html
標籤:VB基礎類
