大家直接看代码，很简单，不知大家平时怎么测试的！

Dim timer As New Stopwatch()

timer.Start()

Dim j As Integer = 1
For i As Integer = 0 To 100000000
	j += 1
Next

timer.Stop()

Me.Label1.Text = timer.Elapsed.ToString() + "显示秒：" + timer.ElapsedMilliseconds.ToString()