ТЕМА № 1. Арифметические вычисления с помощью элемента управления TextBox

Задание: разработайте приложение, которое вычисляет сумму трех чисел при нажатии на кнопку.

Справочный материал

Элемент управления TextBox, размещенный в форме, служит для ввода пользователем информации во время работы приложения или отображения информации, задаваемой свойством Text программно или при разработке. Объект TextBox, так же как и метка, отличается большим набором свойств. Рассмотрим их более подробно.

Для задания стиля рамки текстового поля применяется свойство Borderstyle (Стиль рамки). Оно содержит два значения. По умолчанию используется значение Fixed Single, при котором поле выделено рамкой. При установке значения None рамка вокруг поля отсутствует. Свойство Appearance позволяет придать объемность текстовому полю, имеющему рамку.

Свойства Backcolor и ForeColor позволяют соответственно задать цвет фона и цвет текста, размещаемого в элементе управления TextBox.

С помощью свойства Alignment (Выравнивание) можно задать вариант выравнивания информации в поле: по центру, по левому или правому краю.

Для задания наименования, размера и начертания шрифта, отображаемого в текстовом поле, используется свойство Font (Шрифт).

По умолчанию предполагается, что текстовое поле служит для ввода одной строки текста. Свойства MultiLine и ScrollBar элемента управления TextBox позволяют настроить объект таким образом, что он будет использоваться для ввода нескольких строк или даже большого блока текстовой информации (!).

Ход работы

1   Внимание! Называйте все объекты согласно правилам именования объектов, принятых в VB. В скобках предложен возможный вариант для имени создаваемого объекта.

2   Создайте новый проект и добавьте в него новую форму (frmSumma).

3   Создайте и запрограммируйте на форме кнопку Выход (cmdExit) (имя кнопки, размеры и расположение на рис. 5).

4   Создайте три элемента управления TextBox (txtA, txtB, txtC) для слагаемых (рис. 5). Задайте свойство Text для этих элементов управления, равным 0.

Рис. 5. Конструктор формы

5   Создайте еще один элемент управления TextBox (txtSumma).

6   Создайте кнопку Вычислить (cmdВычислить).

7   Запрограммируйте событие Click для кнопки Вычислить следующим образом:

Private Sub cmdВычислить_Click()

txtSumma = Str$(Val(txtA) + Val(txtB) + Val(txtC))

End Sub

8   Запустите приложение, введите значения дня слагаемых и посмотрите, что произойдет, если Вы нажмете на кнопку Вычислить.

Рис. 6. Результат работы приложения

9   Сохраните проект на дискете (см. выполнение задания из Создание и сохранение приложения на VB).

Дополнительное задание

Измените приложение так, чтобы оно вычисляло сумму квадратов трех чисел.

Контрольные задания

Разработайте приложение, которое вычисляет:

1) площадь треугольника по трем сторонам;

2) площадь прямоугольника по двум сторонам;

3) площадь треугольника по двум сторонам и углу между ними;

4) площадь параллелограмма по двум сторонам и углу между ними;

5) процент от числа;

6) напряжение, если известно сопротивление и сила тока;

7) угол треугольника, если известны два других угла;

8) медиану треугольника, если известны длины всех его сторон;

9) объем цилиндра, если известны радиус основания и высота;

10) среднее арифметическое двух чисел и среднее геометрическое их модулей.

Вопросы для самоконтроля

1   Какова основная функция элемента управления TextBox?

2   Каков стандартный префикс у элемента управления TextBox?

3   Какое свойство элемента управления TextBox является свойством по умолчанию?

4   Когда генерируется событие Click для TextBox?

5   Почему необходимо располагать элементы управления на форме в определенном порядке?

6   Какая функция VB округляет числовые значения?

7   Какие математические функции языка VB Вы знаете?

Скачано с www.znanio.ru