Приложение «Метроном»
Данное приложение служит для изучения таких элементов как Timer, Shape, Label и линейка прокрутки (ScrollBar).
Создайте новый прект Metronom1.vbp имя формы Metronom.frm.
Создайте линейку прокрутки HScrollBar. Установите его свойства следующими значениями: LageChange=100 это свойство определяет с каким шагом будет меняться значение параметра линейки прокрутки, при щелчке мышью между её стрелками и ползунком; Max=300 это максимальное значение параметра линейки прокрутки, оно достигается когда ползунок находится в крайнем правом положении; Min=1500 противоположное предыдущему свойство; SmallChange=25 это шаг изменения при нажатии на кнопки со стрелками по краям линейки; Value=1000 стартовое значение параметра.
Создайте Timer. Установите значение свойства Interval равное 1000.
Создайте Shape. Установите свайства: FillColor – белый, FillStyle – 0 Solid, Shape – 3 Circle.
Создайте три ярлыка (Label). Два из них расположите по краям линейки прокрутки и озаглавте в соответсвии с рисунком. Третий оизаглавте «1000» и поместите его посередине круга, установив цвет текста красный, а свойство BackStyle – 0 Transparent.
Щёлкнув два раза по линейки прокрутки введите следующий код:
Private Sub HScroll1_Change()
Timer1.Interval = HScroll1.Value
Label3.Caption = HScroll1.Value
End Sub
Этот код выполняется, когда положение ползунка линейки прокрутки изменяется, тогда интервал срабатывания таймера (в миллисекундах) приравнивается к значению параметра линейки прокрутки, который также отображается посередине круга.
Private Sub Timer1_Timer()
Beep
If (Shape1.FillColor = 0) Then
Shape1.FillColor = RGB(255, 255, 255)
Else
Shape1.FillColor = RGB(0, 0, 0)
End If
End Sub
Этот код вызывается таймером через интервал времени, заданный в свойстве Interval, если свойство Enebled=True. Тогда издаётся звуковой сигнал и цвет заливки круга меняется на противоположный.
10 Контрольные вопросы
1. Дайте определение и назначение операционной системы.
2. Перечислите и охарактеризуйте типы алгоритмических языков. Что такое транслятор?
3. Что такое файловые системы?
4. Что такое драйверы внешних устройств?
5. Объясните основные характеристики операционных систем.
6. Дайте определение сетевых операционных систем и перечислите их типы.
7. Охарактеризуйте стандартные операционные системы, приведите примеры.
8. Охарактеризуйте режимы операционной системы Windows.
9. Объясните вытесняющую и кооперативную многозадачность.
10. Что такое планирование, классы и уровни приоритетов?
11. Что такое виртуальная память?
12. Что такое постраничная подкачка?
13. Объясните обмен сообщениями в Windows.
14. Что такое виртуальные машины?
15. Что такое интерфейс прикладного программирования Win32? Перечислите и охарактеризуйте библиотеки динамической загрузки.
16. Перечислите причины включения
16-разрядных компонент в Windows 95/98.
17. Объясните механизм шлюзования.
18. Что такое реестр? Объясните работу в редакторе реестра.
19. Перечислите и охарактеризуйте ключи реестра.
20. Перечислите и охарактеризуйте основные элементы управления.
21. Перечислите и охарактеризуйте несколько дополнительных элементов управления.
22. Объясните как изменять свойства элементов управления.
23. Перечислите и охарактеризуйте некоторые часто используемые свойства элементов управления.
24. Что такое события? Приведите примеры.
25. Объясните как описываются переменные в Visual Basic.
26. Какие условные операторы Вы знаете?
27. Какие Вы знаете операторы, управляющие циклом?
28. Объясните, как создать меню с помощью редактора меню.
29. Охарактеризовать группы меню Visual Basic.
30. Объясните, как подготовить с помощью мастера инсталяции и далее использовать дистрибутивный комплект.
11 Задания на лабораторные работы
1. Создайте калькулятор с возможностью ввода цифр, обнуления и выполнения операций (по варианту):
|
№ |
Функция |
№ |
Функция |
|
|
1 |
сложение |
2 |
вычитание |
|
|
3 |
умножение |
4 |
деление |
|
|
5 |
сумма арифметической прогрессии |
6 |
сумма геометрической прогрессии |
|
|
7 |
синус |
8 |
косинус |
|
|
9 |
тангенс |
10 |
котангенс |
|
|
11 |
корень квадратный |
12 |
корень кубический |
|
|
13 |
корень пятой степени |
14 |
в минус первой степени |
|
|
15 |
в квадрате |
16 |
в третьей степени |
|
|
17 |
логарифм по основанию 2 |
18 |
логарифм по основанию 3 |
|
|
19 |
логарифм по основанию 5 |
20 |
е в степени |
|
|
21 |
2 в степени |
22 |
3 в степени |
|
|
23 |
5 в степени |
24 |
поменять знак |
|
№ |
Тип |
№ |
Тип |
№ |
Тип |
№ |
Свойство |
|||
|
А-1 |
*.txt |
А-5 |
*.com |
А-9 |
*.arj |
Б-1 |
ReadOnly |
|||
|
А-2 |
*.doc |
А-6 |
*.bat |
А-10 |
*.bmp |
Б-2 |
Archive |
|||
|
А-3 |
*.rtf |
А-7 |
*.rar |
А-11 |
*.jpg |
Б-3 |
Hidden |
|||
|
А-4 |
*.exe |
А-8 |
*.zip |
А-12 |
*.gif |
Б-4 |
System |
|
№ |
Фигура |
№ |
Цвет |
|
|
А-1 |
окружность |
Б-1 |
красный |
|
|
А-2 |
квадрат |
Б-2 |
чёрный |
|
|
А-3 |
прямая |
Б-3 |
зелёный |
|
|
А-4 |
эллипс |
Б-4 |
синий |
|
|
А-5 |
прямоугольник |
Б-5 |
коричневый |
|
|
А-6 |
пересеченные линии |
Б-6 |
жёлтый |
|
|
А-7 |
прямоугольный треугольник |
Б-7 |
серый |
5.
Создайте Главную форму с дочерними MDI формами редактора, проводника и калькулятора. Создайте меню: Файл (Выход ), Дочерние формы (Показать калькулятор, Показать проводник, Показать редактор, Показать все, Очистить все).
