End Sub. Private Sub FormStudLst_Load(ByVal sender As

⇐ Предыдущая 3 4 5 6 789 10 11 12 Следующая ⇒

12. Проверить работу приложения Университет по созданию файла Student.dat.

13. Создать новую форму (Name - FormStudLst, Text – Сведения о студентах) и разместить в ней следующие элементы управления, выбрав для них размеры и установив их положение в соответствии с рис. 3.3:

· поле txtFIO1 для вывода фамилии;

· поле txtAdr1 для вывода адреса студента;

· поле txtDr1 для вывода даты рождения;

· поле txtPol1 для вывода пола студента;

· поле txtNomSt1 для вывода номера зачетной книжки;

· поле txtNomGr1 для вывода номера группы;

· поле txtSp1 для вывода названия специальности;

· переключатель Check _1 для отображения вида обучения;

· кнопку CmdUp для вывода сведений о студенте из следующей записи файла;

· кнопку CmdDown для вывода сведений о студенте из предыдущей записи файла;

· надписи к полям: lblFIO1, lblAdr1, lblDr1, lblPol1, lblNomSt1, lblNomGr1, lblSp1.

14. С событием Load объекта FormStudLst Events связать следующую процедуру:

Private Sub FormStudLst_Load(ByVal sender As _

System.Object, ByVal e As System.EventArgs) Handles _

MyBase.Load

FileOpen(1, "Student.dat", OpenMode.Random, _

OpenAccess.Default, OpenShare.Default, Len(RecStud))

nRecStud = 1

ReadRecordStud()

End Sub

15. В модуль формы добавить процедуру ReadRecordStud:

Private Sub ReadRecordStud()

FileGet(1, RecStud, nRecStud)

txtFIO1.Text = RecStud.FIO

txtAdr1.Text = RecStud.Adr

txtNomSt1.Text = RecStud.NomSt

txtPol1.Text = RecStud.Pol

txtDr1.Text = RecStud.DataR

txtNomGr1.Text = RecStud.NomGr

txtSp1.Text = RecStud.Sp

If RecStud.VidOpl = True Then

Check_1.Checked = True

Else

Check_1.Checked = False

End If

End Sub

16. С событием Click кнопки cmdUp связать процедуру:

Private Sub CmdUp_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles CmdUp.Click

If nRecStud < LOF(1) / Len(RecStud) Then

nRecStud = nRecStud + 1

ReadRecordStud()

Else

MsgBox("Конец файла")

End If

End Sub

17. С событием Click кнопки cmdDown связать процедуру:

Private Sub CmdDown_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles CmdDown.Click

If nRecStud > 1 Then

nRecStud = nRecStud - 1

ReadRecordStud()

Else

MsgBox("Начало файла")

End If

End Sub

18. С событием Closing объекта FormStudLst Events связать процедуру.

Private Sub FormStudLst_Closing(ByVal sender As Object,_

ByVal e As System.ComponentModel.CancelEventArgs) _

Handles MyBase.Closing

FileClose(1)

End Sub

End Class

19. Активизировать форму FormMenu и связать с событием Click кнопки cmdLst процедуру открытия формы FormStudLst:

Private Sub cmdLst_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles cmdLst.Click

Dim form2 As FormStudLst = New FormStudLst

Form2.Show()

End Sub

20. Сохранить проект.

21. Проверить работу приложения Университет на контрольном примере.

ЛАБОРАТОРНАЯ РАБОТА № 4.
Разработка и отладка приложения по индивидуальному
заданию

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

В соответствии с индивидуальным заданием необходимо самостоятельно:

· разработать пользовательский интерфейс приложения (окно приложения, окна форм для ввода/вывода данных, окна сообщений и меню приложения;

· выполнить программирование процедур создания и просмотра файлов;

· выполнить программирование задач обработки данных файлов.

Вариант 1.

Создать Windows-приложение "Расчет повременной зарплаты".

Предусмотреть:

1. Создание входных файлов:

Справочник рабочих (Табельный номер, Фамилия, Имя, Отчество, Разряд, Цех);

Справочник тарифов (Разряд, Тариф(руб/час)).

2. На основе данных входных файлов и отработанного времени, вводимого в форму, получение выходного файла:
Начисленная зарплата ( Цех, Табельный номер, Начислено).

3. Вывод в форму из выходного файла начисленную зарплату по заданному табельному номеру.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 2.

Создать Windows-приложение "Расчет повременной зарплаты по цеху".

Предусмотреть:

1. Создание входных файлов:
Справочник рабочих (Табельный номер, Фамилия, Имя, Отчество, Разряд, Цех). Количество цехов 3;
Справочник тарифов (Разряд, Тариф(руб/час));

2. На основе данных входных файлов и отработанного времени, вводимого в форму, получение выходного файла:
Начисленная зарплата( Цех, Табельный номер, Начислено).

3. Вывод общей по цеху начисленной зарплаты.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 3.

Создать Windows-приложение "Формирование плана выпуска продукции".

Предусмотреть:

1. Создание входных файлов:
Справочник цехов изготовителей (Код цеха, Наименование цеха). Количество цехов 3;
Справочник характеристик продукции (Код продукции, Наименование продукции, Код цеха, Цена).

2. На основе данных входных файлов и Планового количества, вводимого в форму, получение выходного файла:
План выпуска ( Код цеха, Код продукции, Количество, Стоимость).

3. Вывод общей по цеху плановой стоимости выпускаемой продукции.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 4.

Создать Windows-приложение "Формирование плана выпуска изделий".

Предусмотреть:

1. Создание входных файлов:
Справочник изделий (Код изделия, Наименование изделия, Цена сборки);
Справочник деталей (Код детали, Наименование детали, Цена);
Состав изделия ( Код изделия, Код детали, Количество в изделии).

2. На основе данных входных файлов и Планового количества изделий, вводимого в форму, получение выходного файла:
План выпуска изделия ( Код изделия, Стоимость выпуска изделия).

3. Вывод Стоимости выпуска заданного изделия.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 5.

Создать Windows-приложение "Расчет удержаний с зарплаты".

Предусмотреть:

1. Создание входных файлов:
Справочник работников (Табельный номер, Фамилия, Имя, Отчество, Номер отдела, Количество льгот);
Н ачисления (Табельный номер, Начислено).

2. На основе данных входных файлов получение выходного файла:
Удержания ( Табельный номер, Удержание в ПФ, Удержание ПН).

3. Вывод общей суммы удержаний по заданному табельному номеру.

4. Создание меню для выполнения всех указанных в задании пунктов.

Примечание: Размер МРОТ должен быть задан при открытии формы Расчет удержаний.

Удержание в ПФ = Начислено* 0.01

Удержание ПН = (Начислено - МРОТ*Количество льгот)*0.12

Вариант 6.

Создать Windows-приложение "Расчет заплаты к выдаче".

Предусмотреть:

3. Вывод суммы зарплаты к выдаче по заданному табельному номеру.

4. Создание меню для выполнения всех указанных в задании пунктов.

Примечание: Размер МРОТ должен быть задан при открытии формы Расчет удержаний.

Удержание в ПФ = Начислено* 0.01

Удержание ПН = (Начислено - МРОТ*Количество льгот)*0.12

Вариант 7

Создать Windows-приложение "Формирование программы строительно-монтажных работ".

Предусмотреть:

1. Создание входных файлов:
Смета работ (Код объекта, Наименование объекта, Код работы, Физический объем работы);
Справочник расценок (Код работы, Наименование работы, Расценка (руб.)).

2. На основе данных входных файлов получение выходного файла:
Стоимость работ ( Код объекта, Итоговая стоимость работ).

3. Вывод Итоговой стоимости работ по заданному объекту.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 8

Создать Windows-приложение "Учет потребности в деталях на план выпуска".

Предусмотреть:

1. Создание входных файлов:
Справочник изделий (Код изделия, Наименование изделия, План выпуска);
Справочник деталей (Код детали, Наименование детали, Цена);
Состав изделия ( Код изделия, Код детали, Количество в изделии).

2. На основе данных входных файлов и заданных кодов деталей получение выходного файла:
Плановая потребность ( Код детали, Количество на план, Стоимость).

3. Вывод Количества и Стоимости требуемых деталей.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 9

Создать Windows-приложение "Учет движения деталей на складе".

Предусмотреть:

1. Создание входных файлов:
Движение (Код детали, Наименование детали, Остаток на начало);
Накладные на поступление (Номер накладной, Код детали, Количество поступило);
Требования на выдачу ( Номер требования,Код детали, Количество выдано).

2. На основе данных входных файлов и заданных кодов деталей получение выходного файла:
Учет остатков ( Код детали, Остаток на конец).

3. Вывод остатков на начало и конец обработки по заданному коду детали.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 10

Создать Windows-приложение "Формирование счетов на оплату в автосервисе".

Предусмотреть:

1. Создание входных файлов:
Справочник видов работ (Код работы, Марка автомобиля, Наименование работы, Стоимость работы);
Заказы (Дата, Номер заказа, Клиент, Марка автомобиля, Код работы).

2. На основе данных входных файлов и заданных Номеров заказов получение выходного файла:
Счет ( Дата, Номер заказа, Марка автомобиля, Стоимость заказа).

3. Вывод Стоимости заказа по заданному Номеру заказа.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 11

Создать Windows-приложение "Учет выполнения работ в автосервисе".

Предусмотреть:

1. Создание входных файлов:
Справочник видов работ (Код работы, Марка автомобиля, Наименование работы, Стоимость работы);
Справочник исполнителей работ ( Код исполнителя, Фамилия И.О.);
Заказы (Дата, Номер заказа, Клиент, Марка автомобиля, Код работы, Код исполнителя).

2. На основе данных входных файлов и заданных Номеров заказов получение выходного файла:
Выполнение работ ( Код исполнителя, Номер заказа, Марка автомобиля, Стоимость заказа).

3. Вывод Стоимости выполненных работ по заданному Коду исполнителя.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 12

Создать Windows-приложение "Учет торговых заказов ".

Предусмотреть:

1. Создание входных файлов:
Каталог товаров (Код товара, Наименование товара, Цена);
Клиенты (Код клиента, Наименование клиента, Адрес, Телефон).

2. На основе данных входных файлов и заданного в форме Кода клиента, Кода товара и Количества получение выходного файла:
Заказы ( Номер заказа, Дата заказа, Код клиента, Код товара, Количество).

3. Вывод Стоимости заказа по заданному Номеру заказа

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 13

Создать Windows-приложение "Формирование реестра заказов ".

Предусмотреть:

1. Создание входных файлов:
Справочник услуг (Код услуги, Наименование услуги, Стоимость услуги);
Клиенты (Код клиента, Наименование клиента, Адрес, Телефон).

2. На основе данных входных файлов и заданного в форме Кода клиента, Кода услуги и Стоимости услуги получение выходного файла:
Заказы ( Номер заказа, Дата заказа, Код клиента, Код услуги, Стоимость услуги).

3. Вывод Общей стоимости заказа по заданному Номеру заказа.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 14

Создать Windows-приложение "Учет оплаты заказов ".

Предусмотреть:

3. Вывод суммы оплаты заказов по заданной Форме оплаты.

4. Создание меню для выполнения всех указанных в задании пунктов.

Примечание: Форма оплаты: наличными или по безналичному расчету.

Вариант 15

Создать Windows-приложение "Формирование заказов на использование строительных механизмов ".

Предусмотреть:

1. Создание входных файлов:
Справочник строительных механизмов (Код механизма, Наименование, Стоимость одного машиночаса работы);
Заказчики (Код заказчика, Наименование организации, Форма оплаты).

2. На основе данных входных файлов и заданного в форме Кода заказчика, Кода механизма и введенного в форму Объема работы в часах получение выходного файла:
Заказы ( Номер заказа, Дата заказа, Код заказчика, Код механизма, Объем работы в часах).

3. Вывод Стоимости заказа по заданному Номеру заказа.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 16

Создать Windows-приложение "Учет автотранспортных перевозок по маркам автомобилей ".

Предусмотреть:

1. Создание входных файлов:
Справочник марок автомобилей (Код марки автомобиля, Марка автомобиля, Стоимость перевозки одного ткм);
Автомобили (Инвентарный номер, Код марки автомобиля);
Заказчики (Код заказчика, Наименование заказчика, Адрес, Телефон).

2. На основе данных входных файлов и заданного в форме Кода заказчика, Инвентарного номера автомобиля и введенных в форму Массы груза и Расстояния, Номера заказа и Даты заказа получение выходного файла:
Заказы ( Номер заказа, Дата заказа, Код заказчика, Инвентарный номер автомобиля, Масса груза(тн), Расстояние(км)).

3. Вывод Стоимости заказа по заданному Номеру заказа.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 17

Создать Windows-приложение "Учет автотранспортных перевозок по маркам автомобилей ".

Предусмотреть:

3. Вывод Стоимости перевозок по заданной Марке автомобиля.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 18

Создать Windows-приложение "Учет продаж продовольственных товаров ".

Предусмотреть:

1. Создание входных файлов:
Ценник (Код товара, Наименование товара, Цена розничная);
Накладные (Номер накладной, Код товара, Количество поступило, Дата поступления).

2. На основе данных входных файлов и заданного в форме Кода товара, и введенных в форму Количества продано и Даты продажи и Номера чека получение выходного файла:
Продажи (Номер чека, Код товара, Количество продано, Дата продажи).

3. Вывод Остаточной стоимости товара по заданному Коду товара.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 19

Создать Windows-приложение "Учет финансирования строительных объектов по отраслям".

Предусмотреть:

1. Создание входных файлов:
Отрасли (Код отрасли, Наименование отрасли (жилье, здравоохранение, культура и так далее));
Строительный объект (Наименование объекта, Код отрасли, Код организации, Объем финансирования в 1 квартале, Объем финансирования во 2 квартале, Объем финансирования в 3 квартале, Объем финансирования в 4 квартале, Год ввода в эксплуатацию).

2. На основе данных входных файлов и заданного в форме Кода отрасли получение выходного файла:
Финансирование отрасли (Код отрасли, Объем финансирования в 1 квартале, Объем финансирования во 2 квартале, Объем финансирования в 3 квартале, Объем финансирования в 4 квартале).

3. Вывод Общей суммы финансирования по заданному Коду отрасли.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 20

Создать Windows-приложение "Учет финансирования строительных объектов по организациям".

Предусмотреть:

1. Создание входных файлов:
Отрасли (Код отрасли, Наименование отрасли (жилье, здравоохранение, культура и так далее));
Строительная организация (Код организации, Наименование организации);
Строительный объект (Наименование объекта, Код отрасли, Код организации, Объем финансирования в 1 квартале, Объем финансирования во 2 квартале, Объем финансирования в 3 квартале, Объем финансирования в 4 квартале, Год ввода в эксплуатацию).

2. На основе данных входных файлов и заданного в форме Кода организации получение выходного файла:
Финансирование по организациям (Код организации, Объем финансирования в 1 квартале, Объем финансирования во 2 квартале, Объем финансирования в 3 квартале, Объем финансирования в 4 квартале).

3. Вывод Общей суммы финансирования по заданному Коду организации.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 21

Создать Windows-приложение "Учет автотранспортных перевозок по заказчикам".

Предусмотреть:

3. Вывод Стоимости заказа по заданному Коду заказчика.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 22

Создать Windows-приложение "Учет продаж промышленных товаров".

Предусмотреть:

3. Вывод Стоимости проданного товара по заданному Коду товара.

4. Создание меню для выполнения всех указанных в задании пунктов.

Вариант 23

Создать Windows-приложение "Учет студентов ".

Предусмотреть:

1. Создание входных файлов:
Справочник факультетов (Номер факультета, Наименование факультета);
Справочник специальностей (Код специальности, Наименование специальности);
Справочник студентов (Номер зачетной книжки, ФИО, Номер группы, Вид обучения).

2. На основе данных входных файлов и заданного в форме Кода специальности получение выходного файла:
Обучение (Номер факультета, Код специальности, Количество коммерческих студентов, Количество бюджетных студентов).

3. Вывод Количества.коммерческих студентов по заданному Коду специальности.

4. Создание меню для выполнения всех указанных в задании пунктов.

⇐ Предыдущая 3 4 5 6 789 10 11 12 Следующая ⇒

Дата добавления: 2015-10-15; просмотров: 609. Нарушение авторских прав; Мы поможем в написании вашей работы!

Композиция из абстрактных геометрических фигур Данная композиция состоит из линий, штриховки, абстрактных геометрических форм...

Важнейшие способы обработки и анализа рядов динамики Не во всех случаях эмпирические данные рядов динамики позволяют определить тенденцию изменения явления во времени...

ТЕОРЕТИЧЕСКАЯ МЕХАНИКА Статика является частью теоретической механики, изучающей условия, при которых тело находится под действием заданной системы сил...

Теория усилителей. Схема Основная масса современных аналоговых и аналого-цифровых электронных устройств выполняется на специализированных микросхемах...

Виды сухожильных швов После выделения культи сухожилия и эвакуации гематомы приступают к восстановлению целостности сухожилия...

КОНСТРУКЦИЯ КОЛЕСНОЙ ПАРЫ ВАГОНА Тип колёсной пары определяется типом оси и диаметром колес. Согласно ГОСТ 4835-2006* устанавливаются типы колесных пар для грузовых вагонов с осями РУ1Ш и РВ2Ш и колесами диаметром по кругу катания 957 мм. Номинальный диаметр колеса – 950 мм...

Философские школы эпохи эллинизма (неоплатонизм, эпикуреизм, стоицизм, скептицизм). Эпоха эллинизма со времени походов Александра Македонского, в результате которых была образована гигантская империя от Индии на востоке до Греции и Македонии на западе...

Задержки и неисправности пистолета Макарова 1.Что может произойти при стрельбе из пистолета, если загрязнятся пазы на рамке...

Вопрос. Отличие деятельности человека от поведения животных главные отличия деятельности человека от активности животных сводятся к следующему: 1...

Расчет концентрации титрованных растворов с помощью поправочного коэффициента При выполнении серийных анализов ГОСТ или ведомственная инструкция обычно предусматривают применение раствора заданной концентрации или заданного титра...

Studopedia.info - Студопедия - 2014-2025 год . (0.013 сек.) русская версия | украинская версия