ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 26.07.2024
Просмотров: 246
Скачиваний: 0
True (Да) – виден;
False (Нет) – не виден.
Флажок
– CheckBox.Используется,
когда пользователь должен
ввести «Да»
(флажок установлен
)
или «Нет»
(флажок снят
).
Свойства:
Value – содержит значение элемента управления. Имеются следующие значения:
нет, флажок снят;
есть, флажок установлен;
флажок недоступен.
6.
Переключатель
–
OptionButton Позволяет
пользователю выбрать один вариант из
нескольких.
Свойства:
Value – показывает, выбрана опция (1) или нет (0).
Два самых важных свойства любой кнопки Name и Caption. По значению первого Visual Basic отличает одну кнопку от других. Свойство Caption определяет текст, который должен находиться на кнопке.
Оборудование, инструменты и приборы: ПЭВМ, программное обеспечение Microsoft Office (Visual Basic).
Задания
Разработать алгоритм, спроектировать форму и составить программный код (записать текст программы) для решения задач, приведенных в таблице 1, согласно выданному преподавателем варианту заданий.
Таблица 1
Варианты заданий
|
№ варианта |
Задание |
|
1 |
Вычислить линейную функцию y = kx + b |
|
2 |
Найти площадь грани, объема и полной поверхности куба с ребром, равным a (например а = 3) |
|
3 |
Определить площадь треугольника по заданным длинам трех его сторон (формула Герона) |
|
4 |
Определить площадь кольца по заданным внешнему и внутреннему радиусам |
|
5 |
Определить площадь, высоту и периметр равностороннего треугольника по заданной его стороне |
|
6 |
Определить сумму цифр трехзначного числа и записать его в обратном порядке следования цифр |
|
7 |
Вычислить периметр и площадь прямоугольного треугольника по заданным длинам двух катетов a и b |
|
8 |
Заданы координаты трех вершин треугольника (x1, y1), (x2, y2), (x3, y3). Найти его периметр и площадь |
|
9 |
Вычислить длину окружности и площадь круга одного и того же заданного радиуса R |
|
10 |
Найти произведение цифр заданного четырехзначного числа |
|
11 |
Даны два числа. Найти среднее арифметическое кубов этих чисел |
|
12 |
Вычислить расстояние между двумя точками с данными координатами (x1, y1) и (x2, y2) |
|
13 |
Даны два действительных числа x и y. Вычислить их сумму, разность, произведение и частное |
|
14 |
Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем этого куба |
|
15 |
Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоты, радиусы вписанной и описанной окружностей |
|
16 |
Известна длина окружности. Найти площадь круга, ограниченного этой окружностью |
Окончание табл. 1
|
№ варианта |
Задание |
|
17 |
Найти площадь кольца, внутренний радиус которого равен r, а внешний – заданному числу R (R > r) |
|
18 |
Треугольник задан величинами своих углов и радиусом описанной окружности. Найти стороны треугольника |
|
19 |
Дано a. Не используя никаких функций и никаких операций, кроме умножения, получить а8 за три операции, а10 и а16 за четыре операции |
|
20 |
Найти все углы треугольника со сторонами a, b, c. Предусмотреть в программе перевод радианной меры угла в градусы, минуты и секунды |
|
21 |
Три сопротивления R1, R2, R3 соединены параллельно. Найти сопротивление соединения |
|
22 |
Решить задачу деления «Числителя» на «Знаменатель» по нажатию кнопки «Счет» |
|
23 |
Создать проект «Цвет рыбок». В текстовые поля вводятся количества красных, синих, желтых и зеленых рыбок, а также их общее количество, и создается событийная процедура, вычисляющая процент рыбок каждого цвета и выводящая эти проценты в текстовые поля |
|
24 |
Определить количество ступенек, которые нужно пройти, чтобы подняться на N-й этаж. Лестница между этажами содержит 2 пролета по m ступенек |
|
25 |
Создать проект «Мое имя», который должен выводить на экран окно сообщения, содержащее Ваше имя. Модернизировать проект «Мое имя», добавив вывод сообщения с использованием функции вывода сообщений, надписи и текстового поля |
Порядок выполнения работы
Составьте алгоритм для решения задачи выбора максимума из двух чисел.
Создайте форму проекта «Выбор максимума из двух чисел» с элементами управления «Текстовое поле» (TextBox), «Надпись» (Label), «Кнопка» (CommandButton). Для этого необходимо совершить следующие действия.
Создать Excel-файл. Команда «Пуск/ Все программы/ Microsoft Office/ Microsoft Office Excel 2007».
Внимание: не сохранять на первом этапе созданный файл в бригадной папке.
Поместить в меню экрана вкладку «Разработчик», если ее не было.
Действия: щелчок на кнопке в форме круга в левом верхнем углу экрана с именем «Office». В открывшемся окне – щелчок на кнопке «Параметры Excel», далее активизация щелчком пункта «Показать вкладку «Разработчик на ленте»». В конце щелчок – на кнопке «Ок».
Открыть вкладку «Разработчик» и щелкнуть на значке «Visual Basic» (крайний слева). Быстрый запуск – нажатие клавиш Alt + F11.
Результат: открытие на рабочем поле слева окна проекта и окна свойств проекта (рис. 1). Окна проекта и свойств можно закрывать, а потом открывать (если они оказались закрытыми) по командам «Вид/Окно проекта», «Вид/Окно свойств» (в меню на английском языке: «View/Project Explorer», «View/Properties Window»).
Вставить в рабочее поле заготовку формы – интерфейса будущего проекта. Это можно выполнить по команде «Вставка/ UserForm (Insert/UserForm)» или щелкнув ЛКМ на панели инструментов на соответствующей кнопке (вторая слева) «Insert UserForm».
Результат: появление справа в рабочем поле заготовки формы со стандартным заголовком «UserForm1», отображение этого объекта с тем же именем в окне проекта, открытие окна свойств формы и появление на переднем плане панели инструментов «Toolbox» с элементами управления (ее можно сместить в сторону от окна свойств).
Примечание. Действия для удаления формы:
выделение щелчком имени формы в окне проекта;
команда «Файл/Удалить UserForm1» (File/Remove UserForm);
в открывшемся окне щелчок на кнопке «Нет» в ответ на вопрос «Выполнить экспорт UserForm1 перед удалением?».
Сохранить (именно на этом этапе) созданный Excel-файл, имеющий пока стандартное имя «Книга 1».
Действия: команда «File/ Save Книга 1», открытие папки подгруппы и бригадной папки, задание в поле «Имя файла» предлагаемого имени «max2_my» и щелчок на кнопке «Сохранить».
Результат: открытие окна, в котором надо определиться с поддержкой макросов (это связано с политикой безопасности). Поскольку в данном Excel-файле создается проект VB, имеющий свои компоненты, то необходимо выполнить указание: «Чтобы сохранить файл со всеми компонентами, нажмите кнопку «Нет»», а затем в списке «Тип файла» выберите тип файла с поддержкой макросов («Книга Excel с поддержкой макросов»)». В конце снова щелкнуть на кнопке «Сохранить».
Задать собственное имя проекта и собственный для него заголовок на форме. Действия по заданию имени проекта:
выделить в окне свойств щелчком ЛКМ свойство «Name»;
установить щелчком ЛКМ курсор в поле справа;
удалить стандартное имя;
набрать свое имя, например, «Проба_If»;
в конце задания щелкнуть ЛКМ на форме.
Заголовок формы задается свойством «Caption» (надпись). Предлагается набрать в поле этого свойства «Выбор максимума из двух чисел».
Создать в форме надпись «Ввод а» (а – латинская буква).
Действия:
перетащить с панели инструментов «Toolbox» на форму элемент с именем «Label» («Надпись»);
изменить стандартное значение «Label1» свойства «Caption» на требуемое значение «Ввод а»;
сократить размер надписи с помощью маркеров на рамке;
в конце щелкнуть ЛКМ на форме.
Создать в форме текстовое поле для ввода значения переменной «а».
Действия:
перетащить с панели инструментов на форму элемент с именем «TextBox» (текстовое поле) и поместить его, например, справа от надписи;
изменить стандартное имя «TextBox1» на свое, например, «Text1» (это имя будет использовано в тексте программы);
сократить размер поля по ширине;
поместить в текстовом поле начальное значение переменной «а», например, 10; это можно сделать набором непосредственно в текстовом поле, поместив сначала в него курсор щелчком ЛКМ, и тогда это значение отобразится в окне свойств в строках свойств «Text» и «Value» («значение»); можно по-другому: задать одно из указанных свойств;
в конце щелкнуть ЛКМ на форме.