Timer控件疑问

Question

我用100个Timer控件以2份之1秒处理for 1 to 100 次+-*/运算并每次把结果显示出来,但是遇到瓶颈,是不是每次CPU的周期最多可处理为限,其佘的Timer控件事件都不作处理???

Answer 1

100个Timer控件，是同时运行吗？你的代码...

Answer 2

100 个 timer !!!you wanna a guinness record?

Answer 3

貌似只能有1个timer在一个时间运行的吧

Answer 4

windows同时支持的Timer是有上限的。想实现同时处理100个恐怕只能自己开发操作系统了。

Answer 5

Timer控件不能用得太多，否则会严重降低系统效率。

Answer 6

思路，思路！用那么多timer,敢情你用的是大型计算机?计算神州八号？

Answer 7

有100个CPU的话需要考虑100个线程

Answer 8

当一个timer被触发时,主进程会新建一个新的线程,但此线程与我们所说的线程又有所不同,有什么不同?1.普通线程,相同的二个线程都被成功建立后,二个线程异步执行其中的代码.
2.timer线程,当一个timer被触发后,主进程将把控制权移交给这个线程,当又有其它timer被触发时,第一个timer和第二个timer的执行将是同步的而不是异步.LZ,为啥会出现这个问题,与timer的运行机制有关!

Answer 9

错。
timer不是创建线程，而是往消息队列里面丢了一个消息而已。本质上说，相当于操作系统每隔一段时间按动一次按钮，或者按动一个菜单。

Answer 10

Dim OKG As BooleanPrivate Sub Form_Load()
Dim H As Integer
Dim W As Integer
Dim T As Integer
Dim L As IntegerT = Text1(0).Top
L = Text1(0).Left
H = Text1(0).Height
W = Text1(0).Width
Text1(0).Text = 0
Timer1(0).Interval = 100For o = 1 To 100
    Load Timer1(o)
    Load Text1(o)
    Text1(o).Top = T
    Text1(o).Left = L
    Text1(o).Visible = True
    L = L + W + 30
    If o Mod 10 = 0 Then
        T = T + H + 30
        L = Text1(0).Left
    End If
NextStatic I As Long
I = 1
OKG = TrueEnd SubPrivate Sub Timer1_Timer(Index As Integer)
If OKG Then
    Static I As Long
    I = I + 1
    Text1(Index).Text = I * Index
End If
End Sub以上是代码,如果运算是简单就好正常全部TEXT控件都能看到变化,但是在TIME控件中加了个FOR 
Private Sub Timer1_Timer(Index As Integer)
If OKG Then
    Static I As Long
    For p = 1 To 1000
        I = I + 1
        Text1(Index).Text = (I * Index)
    Next
End If
End Sub
就会有些控件不能作出反映,本人的思路是想用TIME控件做个简单的自治体

Answer 11

VB 中当两个TIMER重叠时，会有这种情况。

Answer 12

哈哈我只用过 1000个 Image来做 雪花飘, 100个Timer 天才啊....你倒不如用 Do...Loop 先加个Doevents再加上100个select case Num 让Num自动加1 100个事件轮着来.