2011-08-07 14 views
2

私はこのプログラムを持っていますが、正弦波を出力しますが速すぎます。どうすればコンソールのライン印刷速度を遅くすることができますか?スローダウンコンソール速度

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 

答えて

4

Thread.Sleep(TimeSpan.FromHours(1))と書くことができます。
(あなたがFromSeconds代わりにしたいかもしれないが)

3

私は通常好む:System.Threading.Thread.Sleep(miliseconds)、もちろん私自身の意見でより簡単な構文を。 ;-)