webページをそうさするには？ (ID:107101)

名前

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

本文 >例えばfor文を使い2万回ぐらい回すとか。 一連の処理を何百回も繰り返すつもりなので、なるべくなら、forで無駄に動かし続けたくはないんです。。 >DocumentCompleteイベントが発生してから処理を行うようにしてみるとか。 ありがとうございます。これが今回のケースには一番合っていると思い、アイディアを頂戴してコードを組んだのですが、（↓） Private Sub Command2_Click() cnum = 1 ・・・・・・（ページ情報を変更） End Sub Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) Select Case cnum Case 1 checker Case 2 ・・・・ End Select cnum = cnum + 1 ・・・・・・・・・・ End Sub ・・・・・・・・・・ Private Sub checker() For Each objInputElement In WebBrowser1.Document.frames(1).Document.getElementsByTagName("INPUT") Select Case LCase(objInputElement.Type) Case "radio" objInputElement(0).Checked = True End Select Next End Sub としても、checkerサブルーチン等に飛んだ形跡がありません。 どこがいけないのか、分かりますでしょうか？