Print Format(curRazmPrem,”0.00”). 


Мы поможем в написании ваших работ!



ЗНАЕТЕ ЛИ ВЫ?

Print Format(curRazmPrem,”0.00”).



7 Для вывода суммы премии, причитающейся студенту, в окне <<Немедленно>> (рисунок 9.13в) используйте следующие строки кода.

Debug.Print "Сумма премии, причитающаяся каждому студенту =";

Format(curRazmPrem, "0.00")

Задача 1. Создайте с использованием переменных приложение, вычисляю­щеерасстояние между двумя точками А и В с координатами X1Y1 и X2Y2.

Указания. Для ввода координат используйте функцию InputBox. Расстояние меджу двумя точками вычислите по формуле . Преду­смотрите вывод результата на форме в следующем виде – Расстояние между точкой А с координатами X1=1, Y1=1 и точкой B с координатами X2=4, Y2=5 равно 5.

Задача 2. Создайте с ис­пользованием переменных приложение для расчета рентабельности учреждения банка, которая исчисляется как отношение прибыли к общей сумме активов.

Указания. Для ввода названия банка, прибыли, полученной за год, и суммы активов используйте тексто­вые поля. Осуществите вывод результата в несколь­ко строк, как показано на рисунке:

 
 

 

Создание приложений c ветвлениями

 

Цель занятия. Научиться использовать конструкции принятия решений в проектах.

Теоретические вопросы

1 Понятие ветвящегося процесса.

2 Операторы ветвления и конструкции их использования.

3 Что такое метка и как она обозначается?

4 Какой процесс ветвления называется множественным?

5 Различия записи оператора IF..THEN...ELSE... в линейной и в блочной форме.

6 Назначение и свойства элементов управления Frame и OptionButton.

Задача 1. Разработайте приложение для выполнения основных математических операций (+, -,*, /) с двумя переменными.

Порядок выполнения работы

1 Создайте новый стандартный проект.

2 Разместите на форме управляющие элементы: метки, текстовые поля, кнопки, рамку (Frame), переключатели (OptionButton).

3 Задайте самостоятельно свойства элементов управления.

4 Перейдите в окно кода и запишите строки, объявляющие переменные. Подберите подходящий тип, учитывая, что числа могут быть большими и дробными.

5 Запишите процедуры для кнопок <Вычислить> и <Выход>.

6 Проверьте правильность работы.

 

 

Рисунок 9.16 – Форма в режиме запуска проекта

 

Процедуры обработки событий

Рисунок 9.17 – Окно кода проекта

Задача 2. Некая сумма денег S помещена в сберкассу под процент Т. Разработайте приложение, которое предлагает пользователю ввести сумму вклада и процент с помощью функции InputBox, затем на форме выводит количество лет, через которое данная сумма станет больше, чем в два раза. Проверьте правильность работы приложения при сумме вклада 5000 р. и 20 % годовых, используя пошаговый режим запуска (<F8>).

Рисунок 9.18 – Образец формы

 
 

 


Рисунок 9.19 – Результат выполнения проекта

Задача 3. Разработайте приложение, которое предлагает пользователю отгадать загадку и в зависимости от полученного ответа выдает сообщение «Это правильный ответ» или «Это неправильный ответ». Используйте линейную конструкцию условного оператора If….Then….Else.

Задача 4. Разработайте проект для вычисления X при различных значениях Z.

Указания

1 При написания кода программы используйте линейную конструкцию условного оператора If….Then….Else. Проверьте правильность ра­боты проекта.

2 Измените линейный тип конструкции услов­ного оператора на блочный. Проверьте пра­вильность работы проекта.

 

Задача 5. Разработайте проект для расчета стипендии студенту в зависимости от его успеваемости. Если по итогам сессии за экзамены получены:

● все пятерки – доплата составляет 50 % к стипендии;

● четверки и пятерки – доплата составляет 20 % к стипендии;

● одна тройка – выплачивается минимальная стипендия;

● больше чем одна тройка – стипендия не выплачивается.

Указания

1 При проектировании формы используйте элементы управления: кнопки, текстовые поля, рамку и переключатели.

2 При написании кода программы используйте линейную конструкцию условного оператора. Проверьте правильность работы проекта.

.



Поделиться:


Последнее изменение этой страницы: 2016-12-16; просмотров: 206; Нарушение авторского права страницы; Мы поможем в написании вашей работы!

infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 3.137.218.230 (0.006 с.)