Построение графиков в vs2010

[romannbo]

Почему не работает Вывод
canvas.DrawString("A", font, 40, 60) 'текст
canvas.DrawString("B", font, 225, 60)
canvas.DrawString("c", font, 130, 160)
как напишешь сразу ошибка .подчеркивается волнистой линией и пишет ошибку
C:\Users\roman\Documents\Visual Studio 2010\Projects\WindowsApplication1\W indowsApplication1\Form1.vb(59) : error BC30518: Не удалось разрешить перегрузку, так как ни один доступный "DrawString" не может быть вызван с данными аргументами:
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, layoutRectangle As System.Drawing.RectangleF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.Brush".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, layoutRectangle As System.Drawing.RectangleF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.RectangleF".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.Brush".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.PointF".
C:\Users\roman\Documents\Visual Studio 2010\Projects\WindowsApplication1\W indowsApplication1\Form1.vb(60) : error BC30518: Не удалось разрешить перегрузку, так как ни один доступный "DrawString" не может быть вызван с данными аргументами:
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, layoutRectangle As System.Drawing.RectangleF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.Brush".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, layoutRectangle As System.Drawing.RectangleF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.RectangleF".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.Brush".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.PointF".
C:\Users\roman\Documents\Visual Studio 2010\Projects\WindowsApplication1\W indowsApplication1\Form1.vb(61) : error BC30518: Не удалось разрешить перегрузку, так как ни один доступный "DrawString" не может быть вызван с данными аргументами:
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, layoutRectangle As System.Drawing.RectangleF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.Brush".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, layoutRectangle As System.Drawing.RectangleF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.RectangleF".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.Brush".
'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF)': Невозможно преобразовать значение типа "Integer" в "System.Drawing.PointF".
Сборка начата 29.06.2016 18:05:36.
ResolveAssemblyReferences:
Будет создан список исключений профиля TargetFramework.
CoreResGen:
Отсутствуют ресурсы, устаревшие по отношению к файлам своих источников. Пропуск формирования ресурсов.
GenerateTargetFrameworkMonikerAttri bute:






Private Sub PictureBox1_Paint(sender As Object, e As System.Windows.Forms.PaintEventArgs ) Handles PictureBox1.Paint
Dim Maxh = PictureBox1.Height
Dim Maxw = PictureBox1.Width
Dim G As Graphics = e.Graphics
' определяем цвет и ширину линий
Dim pen As New Pen(Color.Blue, 1)
Dim pens As New Pen(Color.Green, 1)
' горизонтальные линии
For a = 10 To Maxw Step 20
G.DrawLine(pen, 0, a, Maxw, a)
Next
'вертикальные линии
For a = 10 To Maxw Step 20
G.DrawLine(pens, a, 0, a, Maxh)
Next
' Рисуем линии в PictureBox1 как текст
Dim canvas As Graphics = e.Graphics
'задаем кисть
Dim brush As New SolidBrush(Color.DarkBlue)
'Задаем шрифт
Dim font As New Font("Arial", 26, FontStyle.Bold Or FontStyle.Italic)
' задаем текст
canvas.DrawString("A", font, 40, 60) 'текст
canvas.DrawString("B", font, 225, 60)
canvas.DrawString("c", font, 130, 160)



End Sub

[ura_111]

[romannbo]

Спасибо Ирина! По Вашему все получиось.А вот сразу нет.не знаю почему.
e.Graphics е-это объект,e.Graphics экземпляр класса.
Так е что за объект непонятно.Заранее спасибо.