Круговая диаграмма - VB (58969)

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

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

Каким образом можно нарисовать нечто подобное в VB 6.0, в PictureBox? У меня не получается нарисовать не полную окружность через функцию Picture1.Circle.

Решение задачи: «Круговая диаграмма»

textual
Листинг программы 
Private Sub Command1_Click()
    Picture1.Scale (-10, 10)-(10, -10)
    Picture1.DrawWidth = 3
    Picture1.Circle (-1, -1.4), 7, 255, -3.5, -4.5
    Picture1.Circle (0, 0), 7, 255, -4.5, -3.5
End Sub

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

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

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

10   голосов , оценка 4.1 из 5