Использование случайных величин при рисовании - VB (60782)

Узнай цену своей работы

Формулировка задачи:

Изобразить на форме звезду с разноцветными лучами (множество одинаковых линий, исходящих из одной точки).

Решение задачи: «Использование случайных величин при рисовании»

textual
Листинг программы 
Option Explicit
Private Sub Form_Paint()
    Dim I As Long
    For I = 0 To 63
        Me.Line (Me.ScaleWidth / 2, Me.ScaleHeight / 2)- _
        Step(Cos(0.098174770424681 * I) * Me.ScaleWidth / 2, _
        Sin(0.098174770424681 * I) * Me.ScaleHeight / 2), RGB(Rnd * 255, Rnd * 255, Rnd * 255)
    Next
End Sub

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 4.111 из 5
Похожие ответы