testSub v4() '运行时间0.01秒 Dim t t = Timer For x = 1 To 100000 m = m + 1000 '真接调用内存中的值 Next x MsgBox Timer - t End Su...赞(0)2024-04-27阅读(1752)