IE6で ネットを 安定して 観覧するには (ID:122021)

名前

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

本文 VB6を使いプロジェクトで参照設定 Microsoft Internet Control にチェックを入れ IE6で ネットを観覧するソフトを作っているのですが はじめはうまく動くのですが 時間がたつうちに ネットのアクセスが悪くなり ほとんど動かなくなってしまいます メモリーのせいでしょうか 私のマシンでは６０００くらいで止まってしまいます どなたか解決策を教えていただけないでしょうか Option Explicit Public WithEvents MyIe As SHDocVw.InternetExplorer Dim httplebel1, no Private Sub Command1_Click() Set MyIe = New SHDocVw.InternetExplorer MyIe.Visible = True MyIe.navigate httplebel1 End Sub Private Sub Form_Load() httplebel1 = "http://search.msn.co.jp/results.aspx?FORM=MSNH&v=1&RS=CHECKED&CY=ja&cp=932&q=" 'httplebel2 = "http://www.msn.co.jp/home.armx" no = 1 End Sub Private Sub MyIe_DocumentComplete(ByVal pDisp As Object, URL As Variant) Timer1.Enabled = True End Sub Private Sub interval() MyIe.Quit Set MyIe = Nothing Set MyIe = New SHDocVw.InternetExplorer MyIe.Visible = True no = no + 1 MyIe.navigate httplebel1 & no End Sub Private Sub Timer1_Timer() Timer1.Enabled = False Call interval End Sub