減速控制檯速度

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))。
（雖然你可能想FromSeconds代替）

Answer 2

我通常喜歡：System.Threading.Thread.Sleep(miliseconds)，在我自己當然認爲語法更容易。 ;-)