Презентация на тему Графические методы и операторы цикла

-точка
Line(x1,y1)-(x2,y2), цвет -отрезок
Line(x1,y1)-(x2,y2), цвет, B -прямоугольник
Line(x1,y1)-(x2,y2), цвет, BF -закрашенный
прямоугольник
Circle(x,y),r,цвет -окружность
Circle(x,y),r,цвет , , , k -эллипс
Сls -очистка
DrawWidth=3 -толщина линий

Step шаг
операторы (тело цикла)
Next счётчик

Dim x As Long
Dim y As Long
Dim r As

Long
DrawWidth = 5
For x = 500 To 5000 Step 500
Circle (x, 1000), 500, vbBlue
Next x

5
y = 1000
For x = 1500 To 6000 Step

300
Circle (x, y), 700, vbRed
y = y + 200
Next x

Нарисовать ряд красных окружностей по диагонали, если х=1500, 1800, 2100,….6000, у=1000, 1200, 1400,…..,
R=700