Как раскрасить колонки диаграммы в разные цвета? - VB

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

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

есть такой код помогите сделать так что бы колонки диаграммы были раскрашены в разные цвета за ранее спасибо

Решение задачи: «Как раскрасить колонки диаграммы в разные цвета?»

textual
Листинг программы
Private Sub Command3_Click()
    Dim m, i As Integer
    'далее заполнить массив значениями
    m = Array(63, 63, 29, 30, 40, 20, 50, 90, 90, 70)
    'масштаб
    Picture2.Scale (-2, 110)-(12, 10)
    'потом сама диаграмма
    For i = 0 To UBound(m)
        Picture2.Line (i, m(i))-(i + 1, 0), QBColor(i), BF
    Next
    'оси
    'Picture2.Line (0, 0)-(0, 100)
    'Picture2.Line (0, 0)-(10, 0)
End Sub

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


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

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

11   голосов , оценка 4.091 из 5