ブラウザにキーストロークを安定して送るには？ (ID:85089)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 特定のurl(サンプルではgoogle)をブラウザで開きキーストローク SendKeys.Send("{TAB 10}{ENTER}") を送信したいのですが、正常に動作する事もあるのですが、 キーストロークが正常に送れないケースが頻繁に発生します。 メモ帳や電卓に対しては問題なく、キーストロークが送信 できるのですが、安定して動作させるには、どうしたら良いでしょうか？ 教えてください 'サンプル googleをブラウザで開き [TAB]キーを１０回 [Enter]キーを送信しリンク先にアクセス Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim intProcID As Integer Dim id = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE " & "http://www.google.co.jp/", 1) 'ウエイト System.Threading.Thread.Sleep(5000) 'アクティブにする AppActivate(id) SendKeys.Send("{TAB 10}{ENTER}") End Sub