Использование собственных цветов при градиенте

[AnarCky]

Вот такой код.

Код: Выделить всё

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim graph As Graphics = Me.CreateGraphics
        Dim col1 As Color = RGB(255, 0, 0)      'подчеркнуто
        Dim col2 As Color = RGB(255, 72, 0)     'подчеркнуто
        Dim t1 As New Point(50, 50)             
        Dim t2 As New Point(138, 99)
        Dim rA As New Rectangle(50, 50, 88, 44)
        Dim kGrad As New System.Drawing.Drawing2D.LinearGradientBrush(t1, t2, col1, col2)  'подчеркнуто
        graph.FillRectangle(kGrad, rA)
    End Sub


В VB6 переменной As Color можно было присваивать любой цвет по RGB палитре а в .NET что ли нельзя?

Заранее спасибо!
ПС поиск не принес результатов

[tyomitch]

Наверняка там нужно написать "=New Color(255, 0, 0)"
MSDN под рукой нет, проверить не могу.

[AnarCky]

Безрезультатно... Пишет: величина Integer не может быть преобразована в System.Drawing.Color

[tyomitch]

Я имел в виду: заменить "RGB" на "New Color"

[AnarCky]

Тоже не канает.
" Overlod resolution failed because no 'New' is accessible "

Убираем New:
" 'Color' is a type and cannot be used as an axpression "

[gaidar]

Dim c As Color
c = Color.FromArgb(0, 0, 255)

[gaidar]

Код: Выделить всё

Dim c As Color
c = Color.FromArgb(0, 0, 255)

[AnarCky]

Спасибо!