
- •Лабораторный практикум по курсу
- •Введение
- •Панель элементов управления
- •3. Label Метка
- •4. TextBox Текстовое окно
- •6. CommandButton Командная кнопка
- •9. Combo Box Комбинированный список
- •10. List Box Список
- •12. Vertical Scroll Bar Вертикальная линейка прокрутки
- •13. Timer Таймер
- •14. Drive List Box Список дисков
- •15. Directory List Box Список каталогов
- •16. File List Box Список файлов
- •18. Line Линия
- •Image Изображение
- •Примеры основных процедур, которые используются в лабораторных работах
- •Cls ‘ Clear screen – очистка экрана
- •Пример 7. Остановить выполнение программы
- •Unload Me ‘ выгрузить форму
- •Принципы выполнения лабораторных работ:
- •Последовательность выполнения лабораторной работы
- •Лабораторная работа № 1:
- •Лабораторные основы
- •Лабораторная работа № 2:
- •Математические основы
- •Часть I. "Установка основных параметров для рисования"
- •Часть II "Основные события мыши"
- •Часть III "Создание кисти"
- •Лабораторная работа № 3:
- •Математические основы
- •Простейший алгоритм построения отрезка
- •Алгоритм Брезенхема для построения отрезка.
- •Растровые алгоритмы построения окружности.
- •Лабораторные основы
- •Лабораторная работа № 4:
- •Математические основы
- •1. Кусочно-линейный
- •2. Линейно-круговой
- •3. Полиномиальный
- •Лабораторные основы
- •Лабораторная работа № 5:
- •Математические основы
- •Лабораторные основы
- •Лабораторная работа № 6:
- •Математические основы
- •Лабораторные основы
- •Двумерные преобразования на плоскости
- •Лабораторная работа № 7:
- •Математические основы
- •1916 Бернштейн :
- •1) Кривые Безье
- •Лабораторные основы
- •Метод наименьших квадратов
- •Интерполяционный многочлен Лагранжа
- •Лабораторная работа № 8:
- •Математические основы
- •Лабораторные основы
- •Словарь основных терминов среды Visual Basic Англо-русский словарь
- •Русско-английский словарь
- •Список использованной литературы
18. Line Линия
Инструмент
“Линия” позволяет рисовать на форме
прямые линии. Размер и расположение
линии на форме можно изменить двумя
способами:
Мышью потянуть за концы линии и, тем самым, удлинить или укоротить её. “Схватив” мышью линию, перенести её на новое место.
В таблице свойств Properties изменить свойства X1,Y1,X2,Y2 . Это координаты конечных точек линии.
Свойство BorderColor (Цвет контура) определяет цвет рисуемой линии.
Свойство BorderStyle (Стиль контура) определяет внешний вид линии (пунктир, точка-тире и т.д.) .
Пример программирования. Установить один из концов линии в точку с координатами (100,200) .
Line1.X1=100
Line1.Y1=200
Примечание: в русской версии Visual Basic имя объекта “Line” переведено как “Строка” и поэтому всюду в программах используется это имя; но фактически это “Линия” .
Image Изображение
Инструмент
«Изображение», как и окно рисунка
(PictureBox),
позволяет размещать на форме рисунки
(то есть загружать готовые картинки из
различных файлов установкой свойства
Picture).
Файлы, из которых загружаются картинки, должны иметь форматы .BMP или .ICO .
Инструмент «Изображение» имеет ценное свойство Stretch (Эластичность). Если установить Stretch=True, то растягивая мышкой рамку изображения, можно изменить размеры и, как
следствие, пропорции изображения.
Пример программирования. Сделать картинку, помещенную в “Изображение1”, невидимой Image1.Visible=False
Программирование графики: пиксел, цвет, система координат
Изображение на экране дисплея складывается из множества отдельных точек, которые называются пикселами (pixel – аббревиатура от английских слов «picture elements» – элементы картинки).
Каждый пиксел на экране (а значит и на форме) имеет свой цвет. Пиксел окрашивается смешением красного, зеленого и синего цветов разной интенсивности. А в результате получаем пикселы черного, белого, желтого и т.д. цветов. Таким образом, изображение на экране – это как бы мозаика из разноцветных точек (пикселов). В языке Visual Basic есть функция RGB( ). Её аргументы - это интенсивности цветов красного (RED), зелёного (GREEN ) и синего ( BLUE ). Из таблицы видно, что интенсивности могут изменяться в диапазоне 0 – 255.
Таблица цветов
Черный RGB(0,0,0)
Красный RGB(255,0,0)
Зеленый RGB(0,255,0)
Синий RGB(0,0,255)
Белый RGB(255,255,255)
Желтый RGB(255,255,0)
Малиновый RGB(255,0,255)
Голубой RGB(0,255,255)
Представим себе, что в банку накапали 255 капель красного цвета. Естественно, в банке будет краска красного цвета. Теперь добавим в банку ещё 255 капель синего цвета и получим при смешивании, как видно из таблицы, краску малинового цвета. Но ведь можно смешивать краски не только порциями по 255 капель, а добавлять произвольное количество капель краски из имеющихся в таблице.
Каждый пиксел на экране (а значит и на форме) имеет координаты. При размещении картинок или просто каких-либо объектов на форме используется система координат. Присутствие системы координат проявляется при размещении первого же объекта на форме – будь это пиксел (точка), изображение или, например, просто метка. Если посмотреть в окно свойств Properties, то обнаружим в нём следующие свойства:
Left ( Слева )
Top ( Верх )
Height ( Высота )
Width ( Ширина )
Эти четыре свойства полностью определяют положение и размеры объекта на форме, а эти же свойства самой формы определяют её положение и размеры на экране. Система координат в машинной графике отличается от привычной нам системы координат в алгебре. Для объектов, размещённых на форме, начало системы координат находится в левом верхнем углу формы ( а начало системы координат для формы - в левом верхнем углу экрана); значения по оси X увеличиваются вправо, а по оси Y – вниз.
Свойство Left определяет смещение объекта по оси X (то есть его X-координату) , а свойство Top - по оси Y (то есть его Y-координату).
Рис. 5 Прямая в системе координат на форме
Рис. 6 Объект “Прямоугольник” в системе координат на форме
Основные операторы
' Нарисовать точку с координатами X=10,Y=20.
PSet (10, 20), RGB(0, 0, 0)
'Нарисовать линию между точками X1=20,Y1=30 и X2=100,Y2=200
Line (20, 30)-(100, 200), RGB(0, 0, 0)
'Нарисовать прямоугольник, у которого координаты противоположных углов X1=150,Y1=30 X2=200,Y2=300
Line (150, 30)-(200, 300), RGB(0, 0, 0), B
'Нарисовать окружность с радиусом R=50 и центром в точке X=340, Y=80
Circle (340, 80), 50, RGB(0, 0, 0), , , 1
'Нарисовать сектор окружности
Circle (340, 80), 50, RGB(0, 0, 0), -0.7, -2.1
'Нарисовать окружность с "выкушенным" сектором
Circle (340, 80), 50, RGB(0, 0, 0), -2.1, -0.7
'Нарисовать эллипс, вытянутый по оси X (аспект=0.4)
Circle (500, 80), 50, RGB(0, 0, 0), -2.1, -0.7, 0.4
'Нарисовать эллипс, вытянутый по оси Y (аспект=4)
Circle (600, 80), 50, RGB(0, 0, 0), , , 4