SendKeyについて (ID:83634)

名前

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

本文 >結果はまた明日ご報告させていただきます。 などといっておりましたが、寝るに寝られず試して見ました。 Private Sub Command1_Click() Me.WebBrowser1.Navigate "http://xxxxxxxxxxxxxxx/" DoEvents MsgBox "十分待ちましたか？" '====================================================== DoEvents SendKeys "LOGIN_ID", True 'ログインID SendKeys "{TAB}", True '次のフィールドへ SendKeys "PASSWORD", True 'パスワード SendKeys "{ENTER}", True End Sub nexbe