Hi Leute,
ich habe folgendes Problem: Ich möchte Kreise in einem gewissen Raster anzeigen:
in der inneren Schleife(i) zeichne ich die Kreise in einer Reihe übereinander, in der äusseren Schleife(j) sollen dann die nächsten Reihen mit einem Versatz in x- und y-Richtung gezeichnet werden!
Die innere funktioniert,die erste Reihe wird gezeichnet.
Die äussere aber nicht! Was mache ich falsch?!
Danke im Voraus
rade23
ich habe folgendes Problem: Ich möchte Kreise in einem gewissen Raster anzeigen:
in der inneren Schleife(i) zeichne ich die Kreise in einer Reihe übereinander, in der äusseren Schleife(j) sollen dann die nächsten Reihen mit einem Versatz in x- und y-Richtung gezeichnet werden!
Die innere funktioniert,die erste Reihe wird gezeichnet.
Die äussere aber nicht! Was mache ich falsch?!
VB.NET-Quellcode
- Dim x0 As Double
- Dim y0 As Double
- Dim i As Integer = 1
- Dim j As Integer = 1
- Dim a As Integer = 0
- Dim x As Integer = 0
- Dim y As Integer = 0
- Do While j < Reihen
- Do While i < Anzahl
- x0 = 2 + x
- y0 = a + y
- g.TranslateTransform(x0, y0)
- g.DrawEllipse(Pens.Black, -2), -2), 4, 4)
- g.ResetTransform()
- a += 5
- i = i + 1
- Loop
- x += 3
- y += 6
- j = j + 1
- Loop
Danke im Voraus
rade23