- •Оглавление
- •Введение
- •Лабораторная работа №1 Знакомство со средой Visual Basic. Программирование вычислений.
- •Окно программного кода
- •Задание
- •Лабораторная работа № 2 Проектирование форм приложений
- •Свойства формы
- •Основные элементы управления
- •Проектирование формы
- •Далее разместите в форме командную кнопку, задав для неё свойства
- •Dim X As Single
- •Задание
- •Лабораторная работа № 3 Разветвляющийся вычислительный процесс (ветвление)
- •Оператор if
- •Оператор Select Case
- •Задание
- •Лабораторная работа № 4 Циклический вычислительный процесс (повторение)
- •Оператор For…Next
- •Оператор Do…Loop
- •Задание
- •Лабораторная работа № 5 Сложные циклические вычислительные процессы. Обработка массивов.
- •Массивы
- •Многомерные массивы
- •Задание
- •Лабораторная работа № 6 Обработка строковых данных
- •Dim Symbol As String * 1, s As String * 4 '3
- •Dim Symbol As String * 4 '3
- •Задание
- •Лабораторная работа №7 Создание пользовательского интерфейса в Visual Basic
- •Задание
- •Список литературы
Проектирование формы
Создадим форму для приложения, выполняющего вычисления в соответствии с заданием предыдущей лабораторной работы (рис. 2.1.).
Рис. 2.1. Проектируемая форма
На данной форме размещены следующие элементы управления: надписи (Label), текстовые поля (TextBox), командные кнопки (CommandButton).
Для создания формы своего приложения выполните следующие действия: запустите Visual Basic, в окне New Project выберите значок Standart.exe и выполните на нём двойной щелчок. В центре окна появится новая форма.
Разверните окно проекта до максимального размера.
Установите размеры формы так, чтобы она занимала больше половины по ширине и по высоте. Для формы задайте следующие свойства:
Name (Имя) Calculate
caption Расчёт значения по заданной формуле"
StartUpPosition 2 –Center Screen
Далее необходимо разместить в форме надписи и текстовые поля.
С помощью элемента Label создайте надпись "Значение Х: "и установите для неё следующие свойства:
Caption Значение Х:
Font Курсив, 12
С помощью элемента TextBox разместите первое текстовое поле и установите для него следующие свойства:
Name txtx
Aligment 0 – по левому краю
Font Курсив, 12
ToolTipText Введите число
Text Очистите значение этого свойства, чтобы при запуске
приложения в нём ничего не было
Свойство ToolTipTex определяет всплывающую подсказку, которая появится, если пользователь подведёт мышь к данному объекту.
Выделите надпись "Значение Х:", скопируйте её в буфер обмена, а затем выполните команду "Вставить". Visual Basic предложит вам создать массив элементов управления, выберите ответ "Нет". Переместите надпись на её место в форме. Измените свойство Caption на "Значение y:". Аналогично скопируйте и разместите элемент "Текстовое поле". Задайте для него следующие свойства:
Name txty
Text не забудьте очистить значение этого свойства
Аналогично разместите в форме ещё две пары надписей и текстовых полей (для переменных a и b).
Разместите в форме надпись "Полученное значение Z: " и текстовое поле, в которое будет выведен полученный результат. Свойства этого поля:
Name txtz
Enabled нет (делает поле недоступным)
TabStop False (для того, чтобы пользователь не смог переключить фокус на это текстовое поле, оно предназначено только для вывода результата).
Далее разместите в форме командную кнопку, задав для неё свойства
Caption Вычислить.
Нажатие командной кнопки порождает событие. Создайте текст процедуры обработки этого события. Для этого выполните двойной щелчок. При этом вы получаете доступ в окно ввода программного кода.
В этом окне уже сгенерированы две строки: первая и последняя. Первая строка имеет вид:
Privat Sub Комманда1_Click()
Имя процедуры формируется средой Visual Basic и состоит из двух частей, разделённых знаком подчёркивания _:
Комманда1 – свойство Name, заданное для данной командной кнопки;
Click() – название события – щелчка на этой командной кнопке
Последняя строка имеет вид: End Sub, что означает завершение процедуры. Между первой и последней строкой процедуры обработки события необходимо ввести программный код обработки события – щелчка на кнопке "Вычислить":