Главная страница Случайная страница
КАТЕГОРИИ:
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
ЛАБОРАТОРНО-ПРАКТИЧЕСКАЯ РАБОТА № 4
|
|
Тема: Основные объекты управления и их свойства
Цель: Получить навыки работы с объектами горизонтальная и вертикальная прокрутка и линия
Порядок выполнения
1. Загрузите Visual Basic
2. Установите на форме следующие объекты и измените им свойства
| Объект | Свойство | Значение |
| Рамки | Caption | Толщина линии |
| Font | Размер 10 | |
| Caption | Стиль линии | |
| Font | Размер 10 | |
| Горизонтальные прокрутки | Name | Hsb1 |
| Left | ||
| Top | ||
| Width | ||
| Max | ||
| Min | ||
| LargeChange | ||
| SmallChange | ||
| Name | Hsb2 | |
| Value | ||
| Left | ||
| Top | ||
| Width | ||
| Max | ||
| Min | ||
| LargeChange | ||
| SmallChange | ||
| Name | HsbWidth | |
| Max | ||
| Min | ||
| Name | HsbStyle | |
| Max | ||
| Min | ||
| Вертикальные прокрутки | Name | Vsb1 |
| Value | ||
| Left | ||
| Top | ||
| Height | ||
| Max | ||
| Min | ||
| LargeChange | ||
| SmallChange | ||
| Name | Vsb2 | |
| Value | ||
| Left | ||
| Top | ||
| Height | ||
| Max | ||
| Min | ||
| LargeChange | ||
| SmallChange | ||
| Линия | Name | Line1 |
3. Приведите свою форму в соответствие с образцом
4. В окне кода процедуры обработки события Change набрать
для объекта Vsb1
Line1.Y1 = Vsb1.Value
для объекта Vsb2
Line1.Y2 = Vsb2.Value
для объекта Hsb1
Line1.X1 = Hsb1.Value
для объекта Hsb1
Line1.X2 = Hsb2.Value
для объекта HsbStyle
Line1.BorderStyle = HSbStyle.Value
для объекта HsbWidth
Line1.BorderWidth = HSbWidth.Value
5. Проверьте работу программы, изменяя значения на прокрутках несколькими способами:
- щелчок по одной из стрелок на концах линейки прокрутки;
- перемещение «бегунка»
- щелчок внутри линейки прокрутки
6. Результат показать преподавателю.