Private Sub Timer1_Timer()
SetCursorPos Text3.Text, Text4.Text '定位坐標 我就點擊記事本里面的空白位置
mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 '點擊當前焦點
Timer2.Enabled = True
Timer1.Enabled = False
End Sub
我想做個軟體是把TEXT1框的內容,模擬鍵盤輸出
比如:記事本是打開狀態,然后軟體啟動 就自動定位了坐標點擊記事本了。這時候,開始把我TEXT1里面的文字內容,一個個輸出到 記事本 。。

轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/277202.html
標籤:VB基礎類