关于把时间间隔作为判断条件的问题

ilodyfer

AT = Timer
         
         Dim a, b, c As Integer
         Dim tt As Single
         
         
         a = 1
         b = 1
         c = 0
         e7 = Format(1 / C7, "0.0")
         f7 = Format(1 / D7, "0.0")
         
     While (C1 > 0 And D1 > 0)
         If c = 10 Then
         c = 0
         End If
         at1 = Timer
         
         Worksheets("LOL").Cells(33, 20) = Format(tt, "0.0")
         
         tt = Format(at1 - AT, "0.0")
         DoEvents
         
         If tt = a * e7（当前的时间间隔秒与a*e7判断是否相等） Then
         D1 = D1 - C3 * (100 / (100 + D5))
         
         Worksheets("LOL").Cells(23, 14) = D1
         Worksheets("LOL").Cells(33 + c, 1) = "蓝方英雄" & Worksheets("LOL").Cells(23, 1) & "发动普通攻击对紫方英雄" & Worksheets("LOL").Cells(23, 11) & "造成了" & Format(C3 * (100 / (100 + D5)), "0") & "的伤害，第" & tt & "秒"
         c = c + 1
         a = a + 1
end if
wend
如果把timer的结果format成秒为单位才能得出循环的结果，如果把timer设成0.0以后，只能得出e7,2*e7的结果，后面的结果的不出来，我怀疑3*e7找不到tt和他相等，但是想不出来为什么。。。。