以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]这段代码的解释？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=10704)
--  作者：gaoyong30000
--  发布时间：2011/6/19 14:38:00
--  [求助]这段代码的解释？
 

Dim t1 As Date = Date.Now
Dim Sum As Long
For i As Integer = 1 To 10000000
    Sum = Sum + i
Next
Output.Show("计算结束, 耗时: " & (Date.Now - t1).TotalSeconds & "秒")

 

 

 

今天看了帮助文件  开发篇中有这样的一段代码！

问题是 中间为什么要加入  For i As Integer = 1 To 10000000
                                        Sum = Sum + i
                                   Next

和最后的一行Output.Show("计算结束, 耗时: " & (Date.Now - t1).TotalSeconds & "秒")      有什么联系  ？？


 
--  作者：ybil
--  发布时间：2011/6/19 14:54:00
--  
測試累計 1 To 10000000 所用時間
--  作者：gaoyong30000
--  发布时间：2011/6/19 15:32:00
--  

多谢了~~