Jian,

can you describe what you are talking about...

I tried the loop and then divided it by 5 (for 5 seconds) and I get a return of 53195.4 . Now how does that translate to processor of 850 Meg?? ( my PC is a 850)




Code:

Dim StartTime
Dim X As Long

X = 0
StartTime = Time
Do Until DateDiff("s", StartTime, Time) >= 5
X = X + 1
DoEvents
Loop
Debug.Print X / 5