테스트 목적으로 절차 / 기능 / 주문이 완료되는 데 걸리는 시간을 알고 싶습니다.
이것은 내가 한 일이지만 초 차이가 0이면 경과 된 밀리 초를 반환 할 수 없기 때문에 내 방법이 잘못되었습니다.
절전 값이 500ms이므로 경과 된 초가 0이면 밀리 초를 반환 할 수 없습니다.
Dim Execution_Start As System.DateTime = System.DateTime.Now
Threading.Thread.Sleep(500)
Dim Execution_End As System.DateTime = System.DateTime.Now
MsgBox(String.Format("H:{0} M:{1} S:{2} MS:{3}", _
DateDiff(DateInterval.Hour, Execution_Start, Execution_End), _
DateDiff(DateInterval.Minute, Execution_Start, Execution_End), _
DateDiff(DateInterval.Second, Execution_Start, Execution_End), _
DateDiff(DateInterval.Second, Execution_Start, Execution_End) * 60))
누군가가 더 나은 방법을 보여줄 수 있습니까? 어쩌면 TimeSpan
?
해결책:
Dim Execution_Start As New Stopwatch
Execution_Start.Start()
Threading.Thread.Sleep(500)
MessageBox.Show("H:" & Execution_Start.Elapsed.Hours & vbNewLine & _
"M:" & Execution_Start.Elapsed.Minutes & vbNewLine & _
"S:" & Execution_Start.Elapsed.Seconds & vbNewLine & _
"MS:" & Execution_Start.Elapsed.Milliseconds & vbNewLine, _
"Code execution time", MessageBoxButtons.OK, MessageBoxIcon.Information)
DateTime.Now
일광 절약 및 시간대 문제로 인해 계산을 수행해서는 안됩니다 . 이 주제에 대한 내 블로그 게시물을