inet

[RaPtoR_1]

вот создаю многопоточность
на форме стоит контрол inet
так вот приложение у меня все время выполнило недопустимую ошибку..... что делать?
класс для тхредов взял стандартный который валяеться в даунлоадах

Public ThreadControl1 As clsThreading
ThreadControl1.CreateNewThread AddressOf gethtm, mThreadPriority, 1

Public Function gethtm()
Dim s As String
s = Form1.Inet1(1).OpenURL("http://vbstreets.ru")
Do Until Form1.Inet1(1).StillExecuting = False ' WAIT Downloading..
DoEvents
Loop
Form1.Text1 = Form1.Text1 + s + vbCrLf
End Function

[RaPtoR_1]

с этим разобрался сам