Dim data1 As Date = Date.NowFor i As Integer =0 To 10000000NextDim data2 As Date = Date.Now
Dim tspan As TimeSpan = data2-data1
Output.Show(tspan.TotalMinutes)
加好友 
发短信
Post By：2015/7/18 11:46:00 [显示全部帖子]
