Завдання на самостійну (в) й практичну роботу (вс, лс)
ЗАВДАННЯ 2.2. Постановка задачи:
1. Полностью замените текст области объявления переменных и констант, а также текст программного кода процедуры, которая выполняется при нажатии кнопки ПУСК, на следующий:
DefDate D
DefInt N
Private Sub cmdПуск_Click()
Print "Сегодня", "Я родился", "Я прожил (дней)"
D1 = Date: D2 = "24/12/1949"
N = D1 - D2
Print D1, D2, N
End Sub
Примечание.
Обратите
внимание на то, что дату рождения задаете
в формате D="24/12/1949"
Дата на форме будет напечатана в другом
формате "24.12.1949". Система приводит
значение переменной типа Date к стандартному
виду.
2. Установите с помощью Окна Свойств для формы frmПеременные значение свойства Caption – Переменные типа Date. Текст процедуры, которая выполняется при загрузке формы, не меняйте.
3. Запустите приложение и нажмите кнопку ПУСК. Вид окна приложения:
4. В программном коде присвойте переменной D2 значение даты своего дня рождения.
5. Запустите приложение и нажмите кнопку ПУСК.
6. В начало программного кода добавьте строку Option Explicit.
Примечание. Неявное объявление переменных (с помощью оператора Def или только суффиксов) без необходимости применять не следует, так как в последующем могут возникнуть непредвиденные ошибки. Для того чтобы избежать неприятностей в случае ошибочной записи имени переменной, необходимо в раздел глобальных объявлений General поместить оператор Option Explicit. В этом случае Visual Basic будет расценивать любую неявно объявленную переменную как ошибочную.
С
нова
запустите приложение и нажмите кнопку
ПУСК.
Появится
окно, сообщающее о том, что переменная
не определена.
7. Остановите выполнение программы.
8. Замените строки программного кода
DefDate D
DefInt N
на строки
Dim D1 As Date, D2 As Date
Dim N As Integer
(или для переменной N можно задать тип с помощью суффикса – Dim N%)
9. Еще раз запустите приложение и нажмите кнопку ПУСК.
1
0.
Настройте Visual Basic таким образом, чтобы
при
создании новых проектов требовалось
явное определение переменных
(то есть в разделе глобальных объявлений
General
оператор
Option
Explicit будет
создаваться автоматически): выполните
команду меню Tools,
Options,
затем в диалоговом окне Options
откройте вкладку Editor
и поставьте флажок Require
Variable
Declaration
(Требовать объявление переменной) и
щелкните по кнопке OK.
Если после этого Вы забудете объявить какую-нибудь переменную, Вы получите сообщение Variable not defined (переменная не определена).
11. Сохраните проект и форму на своем рабочем диске в папке ЛАБ2 с именами ЛР2_Зад2_P_Фамилия и ЛР2_Зад2_F_Фамилия соответственно.
1
2.
Дополните
проект ЗАВДАННЯ
2.2 таким
образом, чтобы он позволял определить,
сколько дней, часов и минут вы прожили
со дня своего рождения до сегодняшнего
дня, а также определить, какая дата будет
через определенное количество дней.
Окно
работающего приложения может иметь
вид, представленный ниже.
Лабораторна робота № 3. Область видимості змінної.
Напомним, что оператор определения переменной (см.Лр.2) сообщает среде Visual Basic, что будет храниться в переменной и где эту переменную можно использовать. Область, где используется переменная, называется областью видимости переменной. Переменная может существовать в памяти и быть доступной для одних частей программного кода и одновременно недоступной для других. Переменную можно объявить:
для работы в пределах одной процедуры;
для работы в любой процедуре данной формы;
для работы во всей программе (проекте).
Когда вы объявляете переменную, ее область видимости задается одним из ключевых слов: Dim, Private, Public.
Dim. Таким образом объявляют локальные переменные, которые существуют только во время вызова той процедуры, где они объявлены. Но если переменная с помощью Dim объявлена в разделе глобальных объявлений формы или модуля, то она будет доступна во всех процедурах этой формы или модуля, но для других форм и модулей такая переменная будет невидимой.
Private. Отличается от Dim тем, что не может объявлять переменные внутри процедуры или функции. При объявлении же в разделе глобальных объявлений формы или модуля Dim и Private равнозначны.
Public. Если переменная объявлена с использованием этого ключевого слова, то она является глобальной и доступна из всех форм и модулей проекта. Если переменная объявлена как Public в коде формы, то из других форм и модулей доступ к ней должен осуществляться через такую конструкцию: