程序运行时间查看

       Dim sw As Stopwatch = New Stopwatch
        sw.Start()
运行代码
        sw.Stop()
        Dim ts As TimeSpan = sw.Elapsed '获取总时间
        'ts2.TotalMilliseconds
        Dim strMessage as string =String.Format("运行时间为：{0} 毫秒", ts.TotalMilliseconds)

如果这篇博客对您有所帮助的话，将是我的荣幸，如果能够再点个赞的话，将是多么美好的一件事。?