Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой



Скачать 167.39 Kb.
Дата16.07.2013
Размер167.39 Kb.
ТипДокументы
Графика Visual Basic.
Цвета в VB:
RGB(0, 0, 0) – черный; RGB(0, 0, 255) – синий;

RGB(0, 255, 0) – зеленый; RGB(0, 255, 255) – голубой;

RGB(255, 0, 0) – красный; RGB(255, 0, 255) – фиолетовый;

RGB(255, 255, 0) – желтый; RGB(255, 255, 255) – белый;
Графические методы:
Line(X1,Y1)-(X2,Y2) - линия, где (X1,Y1) – начало, (X2,Y2) – конец.
Line(X1,Y1)-(X2,Y2), RGB(255, 0, 0),B - незакрашенный прямоугольник (рамка), где (X1,Y1) – левый верхний угол, (X2,Y2) – правый нижний угол, RGB(255, 0, 0) – цвет красный, B – рамка;
Line(X1,Y1)-(X2,Y2), RGB(255, 0, 0),BF – закрашенный RGB(255, 0, 0) красным цветом прямоугольник;
Circle(X,Y),Rокружность с центром в (X,Y) и радиусом R;
Pset(X,Y),RGB(255, 0, 0) – точка с координатами (X,Y) и цветом RGB(255, 0, 0);
ForeColor = RGB(255, 0, 0) –установка цвета рамок, окружностей, точек;
FillColor= RGB(255, 0, 0) - установка цвета заливки рамок, окружностей;
FillStyle = 3 - установка стиля заливки; (ниже приведены все стили)




CLS – очистка формы или графического объекта.
Point(X,Y) – определяет цвет в указанной точке.
Некоторые свойства формы в VB.
Height – высота формы;

Width – ширина формы;

Единица измерения в VB twp – твипы (10 twp = 1 точка на экране)
Изменять ширину и высоту формы можно разными способами:

1. Мышкой (ЛКМ на квадраты границ формы);

2. В окне свойств;






3.
Непосредственно в программе:

Private Sub Form_Load()

AutoRedraw = True

Height = 4000

Width = 6000

End Sub
Координаты в VB.




Использование графических методов













500











































Масштаб: 1 клетка 100 twp





































200, 200


































1700, 200


































































































































































































































500
































































































































































2600, 500


































































































































1000, 800














































































































































































































































200, 1200













































































































































































































2100, 1100




















































































































































































































































































































































900, 1600























































































































































Задание №1.

Набрать программу. Запустить на выполнение. Проверить выполнение программы с рис.
Private Sub Form_Load()

Form1.AutoRedraw = True
‘незакрашенный прямоугольник

Line (200,200)-(1000,800),,B
‘закрашенный прямоугольник желтого цвета RGB(255,255,0)

Line (1700,200)-(2600,500),RGB(255,255,0),B
‘линия красного цвета RGB(255,0,0)

ForeColor = RGB(255,0,0)

Line (200,1200)-(900,1600)
‘ закрашенная окружность: стилем 7, синим цветом

FillColor = RGB(0,0,255)

FillStyle = 7

Circle (2100, 1100),300
End Sub


Задание №2:


Используя графические методы, составить программу вычерчивания данного рисунка:


Private Sub Form_Load()

Form1.AutoRedraw = True

‘ кузов

Line (0, 1000)-(3000, 1500), , B

‘ кабина

Line (4500, 1500)-(4500, 1000)

Line (4500, 1000)-(4000, 1000)

Line (4000, 1000)-(4000, 300)

Line (4000, 300)-(3000, 300)

Line (3000, 300)-(3000, 1000)

Line (3000, 1500)-(4500, 1500)

FillStyle = 4

Line (4000, 1100)-(4400, 1400), , B

FillStyle = 7

Line (3100, 400)-(3900, 1400), , B

Line (3200, 500)-(3800, 1000), RGB(0, 255, 0), BF

‘ колеса

FillStyle = 6

Circle (1000, 1800), 300

C
Задание №3:
Загрузить грузовик кирпичиками (прямоугольниками одинаковой ширины и высоты).
ircle (3500, 1800), 300

FillStyle = 0

FillColor = RGB(255, 255, 0)

Circle (1000, 1800), 150

Circle (3500, 1800), 150
End Sub

Похожие:

Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconЛучшее в перу
Новосибирск, ул. Октябрьская 42, оф. 400А; тел: (383) 363-17-33, 255-94-74, 255-91-81
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconЦветопередачи rgb (Red красный, Green зелёный, Blue синий)
Наибольшая чувствительность колбочек сетчатки человеческого глаза приходится на красный, зелёный и синий цвета
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconНастройка adsl-модема d-link 500T
Для настройки модема используется веб-интерфейс. Для этого на компьютере настраивается ip-адрес из подсети 192. 168 х (например,...
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconКолыбель империи инков
Новосибирск, ул. Октябрьская 42, оф. 400А; тел: (383) 363-17-33, 255-94-74, 255-91-81
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconПрограмма для тех, кто хочет увидеть Перу
Новосибирск, ул. Октябрьская 42, оф. 400А; тел: (383) 363-17-33, 255-94-74, 255-91-81
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconКак перевести изображение из rgb в cmyk
Для того чтобы перевести изображение из цветовой модели rgb в цветовую модель cmyk можно воспользоваться функцией
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconСтроковый тип данных
Максимально возможная длина строки целое число в диапазоне. 255. Если этот параметр опущен, то по умолчанию он принимается равным...
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconКурсовой проект разработать программу для обработки растровых изображений, хранящихся в файлах формата bmp (BitMaP)
Ображения. Самый простой способ изменить значения компонентов всех пикселей растрового изображения на некоторое значение V, лежащее...
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой icon1 белый 2 зеленый 3 красный 4 синий
Для кодирования цвета фона страницы Интернет используется атрибут bgcolor="#хххххх", где в кавычках задаются шестнадцатеричные значения...
Rgb(0, 0, 0) черный; rgb(0, 0, 255) синий; rgb(0, 255, 0) зеленый; rgb(0, 255, 255) голубой iconПрограмма создания, редактирования и просмотра графических изображений
Для кодирования цвета фона страницы Интернет используется атрибут bgcolor = «xxxxxx», где в кавычках задаются шестнадцатеричные значения...
Разместите кнопку на своём сайте:
ru.convdocs.org


База данных защищена авторским правом ©ru.convdocs.org 2016
обратиться к администрации
ru.convdocs.org