Окно программного кода
Сразу после запуска Visual Basic это окно не отображается. Тем не менее, оно едва ли не самое важное в Visual Basic, так как именно в нем вводится программный код. Код в Visual Basic: разделяется на процедуры и, как правило, непосредственно связан с определенными элементами управления. Это позволяет открыть окно кода двойным щелчком на элементе управления в форме. Вызвать окно программного кода можно также командой Просмотр (View) – Код (Code)
Приемы работы в редакторе кода Visual Basic. такие же, как и при редактировании текстов в приложениях Windows. Набранные символы вставляются на месте курсора ввода. После нажатия клавиши Insert текстовый курсор принимает форму прямоугольника, что свидетельствует об активизации режима замены. Повторное нажатие клавиши Insert переводит редактор обратно в режим вставки. Выделенный текст при вводе заменяется новым.
Комбинация клавиш [Ctrl+Х] удаляет выделенный текст и помещает его в буфер обмена Windows. Клавиши [Сtrl1+С] служат для копирования текста в буфер обмена, а [Сtrl+V] - для вставки содержимого буфера обмена. Клавишей [ТаЬ] создастся отступ в строке или во всех выделенных строках. С помощью[Сtrl+Tab] текст сдвигается вправо
Над вертикальной полосой прокрутки находится маленькое поле, которое можно перетаскивать с помощью мыши вниз для разделения окна на две части. Это дает возможность редактировать в одном окне две разные процедуры. Разделение отменяется, если разделительную линию переместить к самому краю окна или выполнить двойной щелчок.
Рассмотрим пример. Требуется создать приложение, вычисляющее значение функции
Предусмотреть ввод с клавиатуры значений x, y, a, b.
В форме разрабатываемого приложения разместим элемент управления – командную кнопку, щелчок на которой будет запускать процедуру вычисления. Зададим свойство Caption для созданной кнопки: Вычислить
Алгоритм процедуры вычисления будет содержать следующие этапы:
1. Ввод значений исходных данных
2. Вычисление значений вспомогательных переменных
3. Вычисление значения Z.
4. Вывод полученного значения в окно формы.
Рассматриваемый алгоритм имеет линейную структуру, так как его отдельные этапы выполняются последовательно друг за другом, причём значения переменных, полученные на предшествующих этапах, могут быть использованы на последующих этапах.
Рассмотрим возможности реализации каждого этапа.
1. Ввод значений исходных данных
Для ввода исходных данных будем использовать стандартную функцию InputBox. Эта функция выводит на экран окно, представленное на рис. 1.2.
Вызов функции имеет следующий вид:
X=InputBox("Введите значение х:","Ввод исходных данных")
Рис. 1.2. Окно функции InputBox.
2. Вычисление значений вспомогательных переменных
Если в заданной формуле есть повторяющиеся участки, то целесообразно предварительно упростить выражение, введя вспомогательные переменные. Это сокращает время вычислений и упрощает программирование. Для нашего примера введём вспомогательные переменные
C=|y + 4x2|
D= a2 + b2
3. Вычисление значения Z
После вычисления переменных c и d значение Z вычислим по следующей формуле:
4. Вывод полученного значения в окно формы выполним с помощью оператора
Print " Z=", Z
Для ввода программного кода выполним двойной щелчок на кнопке Вычислить в форме. После этого станет доступным окно кода. Visual Basic уже создал первую и последнюю строку процедуры обработки события:
Private Sub Команда1_Click()
End Sub
Программный код необходимо ввести между этими строками.
Dim x As Single
Dim y As Single
Dim b As Single
Dim a As Single
Dim z As Single
Dim c As Single, d As Single, f As Single
x = InputBox("Введите значение х:", "Ввод исходных данных")
y = InputBox("Введите значение y:", "Ввод исходных данных")
a = InputBox("Введите значение a:", "Ввод исходных данных")
b = InputBox("Введите значение b:", "Ввод исходных данных")
c = Abs(y + 4 * x ^ 2)
d = a ^ 2 + b ^ 2
z = Tan(Sqr(c)) - c / Log(d) + Sin(d)
Print "z=", z
Для того, чтобы начать выполнение приложения, надо выполнить щелчок на кнопке "начать". При этом приложение начинает выполняться и выводит форму. В форме надо выполнить щелчок на кнопке "Вычислить".