Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
6 / 6 / 3
Регистрация: 07.04.2015
Сообщений: 123
1

Как сделать заливку прямоугольника?

18.04.2015, 19:42. Показов 1980. Ответов 3
Метки нет (Все метки)

VB.NET
1
2
3
4
5
6
7
8
9
10
Private Sub frm3DFigure_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        Dim grap As Graphics 'Объявляем класс Graphics
        Dim Width As Integer
        Width = Val(TextBox6.Text)
        Dim Height As Integer
        Height = Val(TextBox7.Text)
        grap = Me.CreateGraphics 'Будем рисовать по форме
        grap.DrawRectangle(Pens.Black, 300, 150, Width, Height) 'Квадрат(Pens.Green - цвет черный) , (70, 50, 100, 100 - координаты)
        grap.FillRectangles(Brushes.White) в этой строчке ошибка
End Sub
В предпоследней строчке ошибка не могу залить фигуру. Помогите!
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.04.2015, 19:42
Ответы с готовыми решениями:

Как сделать градиентную заливку формы
Доброго. Старики, которые помнят vb6, наверняка знали такую штуку Dim lY As Long Dim...

Как выполнить полупрозрачную заливку?
Нужно залить пикчербокс полупрозрачной заливкой. Добавлено через 2 минуты можете не отвечать ,...

Как сделать заливку шара
Uses Graph,crt; Var grDriver : Integer; grMode : Integer; ErrCode : Integer; ...

Как сделать заливку области цветом?
Добрый день, подскажите пожалуйста как можно осуществить сабж? Например, имеется цветочек (как в...

3
200 / 216 / 87
Регистрация: 21.04.2013
Сообщений: 404
18.04.2015, 20:01 2
Цитата Сообщение от Yanik1987 Посмотреть сообщение
VB.NET
1
grap.FillRectangles(Brushes.White) в этой строчке ошибка
Не указан прямоугольник.

Добавлено через 9 минут
+ У Вас попытка залить не прямоугольник, а прямоугольникИ.
0
6 / 6 / 3
Регистрация: 07.04.2015
Сообщений: 123
18.04.2015, 20:05  [ТС] 3
grap.DrawRectangle(Pens.Black, 300, 150, Width, Height)
А как сделать заливку этого прямоугольника?
ширина и высота у меня задаются через textbox
0
8255 / 4490 / 1759
Регистрация: 11.02.2013
Сообщений: 9,534
18.04.2015, 20:07 4
Лучший ответ Сообщение было отмечено Yanik1987 как решение

Решение

Так будет корректно:
C#
1
2
3
4
5
6
Private Sub frm3DFigure_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
    Dim Width As Integer = Val(TextBox6.Text)
    Dim Height As Integer = Val(TextBox7.Text)
    e.Graphics.DrawRectangle(Pens.Black, 300, 150, Width, Height) 'Квадрат(Pens.Green - цвет черный) , (70, 50, 100, 100 - координаты)
    e.Graphics.FillRectangle(Brushes.White, 300, 150, Width, Height)' в этой строчке ошибка
End Sub
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.04.2015, 20:07

Помощь в написании контрольных, курсовых и дипломных работ здесь.

как сделать заливку поверхности прозрачной?
Перерыла весь редактор - там можно либо изменять палитру либо закрашивать все в однотонный цвет от...

Модуль Graph, как сделать заливку фигуры
помогите залить фигуру созданую из 4 линий: line(120,50,180,50); line(180,50,180,60);...

Как сделать заливку фигуры по клику мыши?
Добрый день) Мне надо сделать заливку фигур по клику мыши. Смотрела алгоритмы заливки, но так...

Как сделать анонимную заливку статей в одной категории?
День добрый! Надо чтоб в одной категории (допустим будет называться "Крик души") добавляли без...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.