关于inet多线程的一个问题

Question

不知道这算不算是多线程:
想法:我先在页面加入inet1(?)和Timer1(?).,这样各12个数组控件
For i = 0 To 11  '这里如果11是1时可运行程序,大于1就不行了?为什么这样呢?
或删除webhtml(Index) = Inet1(Index).OpenURL("http://www.163.com")也可以,但需要用到这个来获取网页代码?有什么办法可以解决的呢?--以下为代码--------------------
Dim i As Integer
Dim webhtml(20) As String
Private Sub Command1_Click()
For i = 0 To 11  '这里如果11是1时可运行程序,大于1就不行了?为什么这样呢?
Timer1(i).Enabled = True
Next
End SubPrivate Sub Timer1_Timer(Index As Integer)
webhtml(Index) = Inet1(Index).OpenURL("http://www.163.com")
End Sub

Answer 1

你这样是实现不了多线程的
你的问题可能是timer没有设置间隔时间

Answer 2

Private Sub Timer1_Timer(Index As Integer)
webhtml(Index) = Inet1(Index).OpenURL("http://www.163.com")
End Sub你在这里不要加一个控制代码啊?难道就是让这十二个定时器不断地去访问?还是只需要各访问一次??

Answer 3

个人感觉就没必要用timer:
For i = 0 To 11  
webhtml(Index) = Inet1(Index).OpenURL("http://www.163.com")
Next

Answer 4

如果不用TIMER,那怎么样可以让他不断的进行处理网页呢?
rainstormmaster(暴风雨 v2.0)
你那样的话,他只处理一次就会停止了```我是想让他不断的处理下去页面.当然163是个比方而已.

Answer 5

设定inet.RequestTimeout
不过不可能多线程,多个INET和一个一个样

Answer 6

要用inet1.Execute可能可以
不过可能会出现数据丢失，如果控件数组里的控件多的话，不太清楚