콘솔 속도가 느려집니다

Question

이 프로그램은 사인파를 인쇄하지만 속도가 너무 빠릅니다. 어떻게 콘솔의 회선 인쇄 속도를 느리게 할 수 있습니까?

Sub Main() 
     Dim x As Double = 0 
     Do 
      Console.Write(times(" ", Math.Sin(x) * 10 + 30)) 
      Console.WriteLine("@") 
      x += 0.1 
     Loop 
    End Sub 

    Private Function times(ByVal ch As Char, ByVal t As Integer) As String 
     Dim result As String = "" 
     For i = 0 To t 
      result += ch 
     Next 

     Return result 
    End Function 

Answer 1

Thread.Sleep(TimeSpan.FromHours(1))으로 쓸 수 있습니다.

Answer 2

을 (대신 FromSeconds을 할 수 있지만)
나는 일반적으로 선호 : 물론 내 자신의 의견 System.Threading.Thread.Sleep(miliseconds), 쉽게 구문. ;-)