Внимание: на экране может быть размещено несколько  видимых объектов – окон, рамок, кнопок. Один из объектов (это может быть и окно форм!) обязательно является активным. Окно свойств Properties всегда содержит свойства того объекта, который находится в активном состоянии.

Для удаления видимого элемента с окна форм, выберите его,  щелкнув мышью (элемент окажется помеченным 8-ю черными квадратиками), затем щелкните правой кнопкой мыши – появится  контекстное меню, выберите Cut (Вырезать) и щелкните  левой кнопкой мыши.

Определим теперь свойства введенных элементов, используя окно свойств (Properrties). Активизируем элемент Label], при этом активизируются свойства в окне свойств, относящиеся к этому элементу (заголовок Labell Label). Выберем свойство Caption (Название) и определим его как Первое слагаемое, используя строку ввода. Это название появляется на форме (рис. 1.11).

рис.1.11.

Свойство Caption (Название) для Label2 зададим -  Второе слагаемое.  Свойство Caption (Название) для Label3 зададим Сумма. Остальные оставим по умолчанию. Определим свойства тестовых окон. Активизируем сначала первое окно, очистим окно (удалим значение Textl свойства Text) и присвоим ему имя а (свойство Name (Имя), которое будем использовать при написании текста программ (рис. 1.12). Очистим также второе окно и третье окна и присвоим ем имена  b и sum соответственно. Осталь­ные свойства окон оставим по умолчанию.

Для ввода текста необходимых программ щелкните мышью на кнопке View Code (вид/код) окна «проекты» (окно Piojektl mak) Откро­ется окно FORM1 (имя проектируемой формы по умолчанию Form1) Откроем слева раскрывающийся список General и выберем в нем объект  (в качестве объекта выбирается кнопка Ок, по умолчанию у неё осталось имя Command1) или же дважды щелкнем по кнопке ОК в окне форм.

НЕ нашли? Не то? Что вы ищете?

Private Sub Command1_Click()

Dim per As Integer

Dim vtor As Integer

Dim s As Integer

per = a. Text

vtor = b. Text

s = per + vtor

sum. Text = s

End Sub

Если бы мы не присвоили объекту имя а, то в программе вместо per = a. Text писали бы  per=Text1.text. И аналогично бы с остальными  переменными.

КОНТРОЛЬНЫЕ ВОПРОСЫ.

Виды диалоговых окон. Этапы разработки приложения. Функции преобразования типов. Свойства которого из объектов, размещенных на форме,  отображаются в окне Properties? Какими свойствами характеризуется положение объекта на окне форм? Как задаётся цвет фона? Какие свойства определяют размеры объекта? Как изменить заголовок объекта? Как перевести проект в режим выполнения? Какое свойство объекта включается в название процедуры? Как задается свойство объектов «цвет»?

САМОСТОЯТЕЛЬНОЕ ЗАДАНИЕ

Составить программу перевода  введенной  суммы  в  монгольских  тугриках в доллары. Курс - 1034 к 1 $. Составить программу перевода введенной скорости в км/ч в м/с. Составить программу, для которой вводится  3  числа, выводится  сумма их квадратов. Составить программу, для которой вводится  число  тараканов  в комнате, печатается общее число их ножек и общее число их усов. Вычислить периметр и площадь прямоугольного треугольника по заданным длинам двух катеров a и b. Найти произведение цифр заданного четырёхзначного числа. Найти площадь равнобедренной трапеции с основаниями a и b и углом α при большом основании а. Дано действительное число а. Не используя никаких функций и никаких операций, кроме умножения, получить а8 за три операции; а10 и а16 за четыре операции. Дана величина А, выражающая объём информации в байтах. Перевести А в более крупные единицы измерения информации. Организацией приобретено n принтеров и m компьютеров. Ввести необходимые данные с клавиатуры. Получить стоимость всей покупки. Длина отрезка задана в дюй­мах (1 дюйм = 2,54 см). Перевести значение длины в мет­рическую систему, то есть выразить ее в метрах, санти­метрах и миллиметрах. Так, например, 21 дюйм = 0 м 53 см 3,4 мм. Заданы уравнения двух пересекающихся прямых на плоскости: y = k1+b1; y= k2+b2. Найти (в градусах и минутах) угол между ними, используя формулу: . Русские не метрические единицы длины: 1 вер­ста = 500 саженей; 1 сажень = 3 аршина; 1 аршин = = 16 вершков; 1 вершок = 44,45 мм. Длина некоторого отрезка составляет р метров. Перевести ее в русскую не метрическую систему. Треугольник задается координатами своих вершин на плос­кости: A(x1, y1), В(х2,, у2), С(х3 ,y3). Найти площадь треугольника ABC. Составить программу вычисления по координатам 3-х вершин некоторого треугольника его площади и периметра. Составить программу вычисления объема куба и площади его боковой поверхности, если задана длина ребра.

Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4