Методические указания по выполнению задания


1. Введем переменные:

VT - Вес туши

PP - % потерь при холодной обработке

NZ - Норма закладки

KP - Количество порций

2. Запустить программу с помощью команды Пуск – Программы – Microsoft Visual Basic.

3. В ходе визуальной разработки программы необходимо создать элементы управления, определить их свойства соответственно описанию, приведенного в таблице 11.3.

 

 

Таблица 11.3 – Объекты и их свойства для создания формы проекта «Пример линейного процесса»

 

Объект Свойства Значение
Форма (Form) Name frmPrimer1
Caption Пример линейного процесса
BackColor Светло-зелёный (целесообразно определять с помощью вкладки Palette)
Этикетка (Label) Name lblVT
Caption Вес туши:
Font MS Sans Serif, Bold (полужирный), 8 пунктов
BackColor Светло-зелёный (целесообразно определять с помощью вкладки Palette)
Текстовое поле (TextBox) Name txtVT
Text  
Этикетка (Label) Name lblPP
Caption % потерь при холодной обработке:
Font MS Sans Serif, Bold (полужирный), 8 пунктов
BackColor Светло-зелёный (целесообразно определять с помощью вкладки Palette)
Текстовое поле (TextBox) Name txtPP
Text  
Этикетка (Label) Name lblNZ
Caption Норма закладки:
Font MS Sans Serif, Bold (полужирный), 8 пунктов
BackColor Светло-зелёный (целесообразно определять с помощью вкладки Palette)
Текстовое поле (TextBox) Name txtNZ
Text  
Командная кнопка (Command Button) Name cmdR
   
Caption Расчет
Font MS Sans Serif, Bold (полужирный), 8 пунктов
Этикетка (Label) Name lblMes
Caption  
Font MS Sans Serif, Bold (полужирный курсив), 8 пунктов
BackColor Светло-зелёный (целесообразно определять с помощью вкладки Palette)
Командная кнопка (Command Button) Name cmdО
Caption Очистка
Font MS Sans Serif, Bold (полужирный), 8 пунктов
Командная кнопка (Command Button) Name cmdV
Caption Выход
Font MS Sans Serif, Bold (полужирный), 8 пунктов

4. Вывести окно кода с помощью команды: View - Code

5. Для создания кода программы необходимо ввести описание переменных, создать процедуры (см. табл. 11.4)

Таблица 11.4 – Описание переменных и создание процедур для создания кода проекта «Пример линейного процесса»

 

Данные в строке кода Коментарий
Option Explicit     Dim VT, PP, NZ, KP Данный оператор определяет, что в программе запрещено использование необъявленных переменных   Объявление переменных
Private Sub cmdV_Click() Заголовок процедуры, которая выполняется при нажатии кнопкой мыши на кнопке cmdV (Выход)
End Конец работы программы
End Sub Конец процедуры cmdExit_Click.
Private Sub cmdО_Click() Заголовок процедуры, которая выполняется при нажатии кнопкой мыши на кнопке cmdО (Очистка)
txtVT.Text = "└┘" Свойство Text текстового поля txtVT (для ввода веса туши VT) присваивается значение “└┘“ (пустая строка).
txtPP.Text = "└┘" Свойство Text текстового поля txtPP (для ввода % потерь при холодной обработке - PP) присваивается значение “└┘“ (пустая строка).
txtNZ.Text = "└┘" Свойство Text текстового поля txtNZ (для ввода нормы закладки - NZ) присваивается значение “└┘“ (пустая строка).
txtKP.Text = "└┘" Свойство Text текстового поля txtKP (для ввода количества порций – KP) присваивается значение “└┘“ (пустая строка).
lblMes.Caption="└┘" Свойство Caption этикетки lblMes (для ввода сообщения) присваивается значение “└┘“ (пустая строка).
End Sub Конец процедуры cmdО_Click.
Private Sub cmdR_Click() Заголовок процедуры, которая выполняется при нажатии кнопкой мыши на кнопку cmdR (Расчет)
VT = Val(txtVT.Text) Переменной VT присваивается значение свойства Text объекта txtVT – значение числа, которое введено с помощью клавиатуры. Функция Val преобразовывает текстовое значение в числовое.
PP = Val(txtPP.Text) Переменной PP присваивается значение свойства Text объекта txtPP – значение числа, которое введено с помощью клавиатуры. Функция Val преобразовывает текстовое значение в числовое.
NZ = Val(txtNZ.Text) Переменной NZ присваивается значение свойства Text объекта txtNZ – значение числа, которое введено с помощью клавиатуры. Функция Val преобразовывает текстовое значение в числовое.
KP=(VT-VT*PP/100)/NZ Переменной КР присваивается результат расчета количества порций.
txtKP.Text = Str(KP) Свойству Text объекта txtКР присваивается значение переменной КР. С помощью функции Str выполняется преобразование числового значения переменной в текстовый.
lblMes.Caption=”Приятного аппетита!”   В результате расчета выводится сообщение в виде надписи.
End Sub Конец процедуры cmdR_Click.

 

6. Для запуска программы на выполнение используется команда Run - Start. В случае выявления ошибок можно завершить выполнение программы командой Run - End, внести необходимые исправления в программу.

7. Чтобы сохранить проект необходимо выполнить команду File - Save Project As. При сохранении проекта записываются такие файлы: файл формы (файлы с расширением FRM) и файл проекта (файл с расширением VBP) сам прект.

8. Для создания исполняющего файла программы необходимо выполнить команду File - Make <Пример 1>. exe.

 



Дата добавления: 2019-12-09; просмотров: 507;


Поиск по сайту:

Воспользовавшись поиском можно найти нужную информацию на сайте.

Поделитесь с друзьями:

Считаете данную информацию полезной, тогда расскажите друзьям в соц. сетях.
Poznayka.org - Познайка.Орг - 2016-2024 год. Материал предоставляется для ознакомительных и учебных целей.
Генерация страницы за: 0.008 сек.