Расположение в случайном порядке

Date: 2015-10-07; view: 484.

В этой программе используется операция GraphicsWindow.GetRandomColor для произвольного выбора цвета кисти, а также операция Math.GetRandomNumber (получить случайное число) – для задания кругам координат точек. Эти две операции можно комбинировать по-разному для написания интересных программ, которые каждый раз будут выполняться с разным результатом.

GraphicsWindow.BackgroundColor = "Black"

For i = 1 To 1000

GraphicsWindow.BrushColor = GraphicsWindow.GetRandomColor()

x = Math.GetRandomNumber(640)

y = Math.GetRandomNumber(480)

GraphicsWindow.FillEllipse(x, y, 10, 10)

EndFor

Рисунок 35 – Расположение в случайном порядке