| Forum: VB.NET |
Thema:
Re: Sinuskurve zeichnen |
Von:
Klaas Wedemeyer (
08.02.2005 09:35) |
Hi,
die Funktion Sin, Cos, ... verwenden nicht 360° als Kreis, sondern 2*Pi.
Du mußt nicht von 0 bis 360 zählen sondern von 0 bis 6,28.
In Deinen Beispiel:
dim p(800) as point ' 800 Pixel Breit
for x=0 to 800
Dim Bogen as double = 2*Math.PI*x/800 ' 800 Pixel Breite in Bogenmaß umrechnen
Dim y as integer = 300-300 * Math.Sin(Bogen) ' von -300 bis +300 = 600 Hoch
p(x) = new point(x,y)
next
Klaas
| Betreff |
Von |
Datum |
|
|
|
|
G.
Guest
|
08.02.2005 13:43 |
|
|
|
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
