Пояснительная записка (Вариант №5 - Курсовая работа - Программирование на Visual Basic)

2013-10-05СтудИзба

Описание файла

Файл "Пояснительная записка" внутри архива находится в следующих папках: Slavik (5), Вершинин. Документ из архива "Вариант №5 - Курсовая работа - Программирование на Visual Basic", который расположен в категории "". Всё это находится в предмете "информатика" из 2 семестр, которые можно найти в файловом архиве БГАРФ. Не смотря на прямую связь этого архива с БГАРФ, его также можно найти и в других разделах. Архив можно найти в разделе "курсовые/домашние работы", в предмете "информатика" в общих файлах.

Онлайн просмотр документа "Пояснительная записка"

Текст из документа "Пояснительная записка"

Курсовой проект “Магазин игрушек”

Содержание :

1. Постановка задачи 3

2. Блок-схема алгоритма решения 7

3. Текст программы на языке Visual Basic 9

4. Анализ полученного результата 10

5. Вывод 11



  1. Постановка задачи

Создать файл, содержащий сведения об ассортименте игрушек в магазине.

Каждая запись содержит поля: название игрушки, цена, количество, возрастные границы, например, 2-5, т.е. от 2 до 5 лет.

Написать программу, в результате выполнения которой выдаются следующие сведения:

- название игрушек, которые подходят детям от 1 до 3 лет.

- стоимость самой дорогой игрушки и ее наименование.

- название игрушки, которая по стоимости не превышает х руб. и подходит ребенку в возрасте от а до b лет. Значения x, a, b, вводятся пользователем.





































Введение в Visual Basic

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

При программировании любой задачи в основе ее решения лежит понятие алгоритма. Алгоритм – это последовательность действий, выполнение которых приводит к решению задачи. Различают три основных типа алгоритмов – линейный, разветвляющийся и циклический.

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

Создание текстового файла

Для написания программы мною был создан файл toy.txt, в котором находятся необходимые данные для решения задачи.

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

Конструктор LEGO,3500,2,10,14- В этот файл пользователь вводит данные сам. Но они должны быть правильно записаны.

------Конструктор LEGO – Название игрушки

------3500 – Цена игрушки

------2 – Кол-во игрушек

------10-14 – Возрастной диапазон









Создание формы

Форму создают с помощью Visual Basic 6.0. В нашей программе она одна: “Игрушеки”. На данной форме находятся командные кнопки, элементы управления Label, а также текстовое поле Text, с помощью которых мы вводим и получаем данные в программе. Ниже приведен рисунок формы:

Форма:

В List1 выводится список игрушек подходящих детям в возрасте от 1 до 3 лет. В List2 выводится список игрушек в диапазоне который задал пользователя.

В Label8 и Label9 выводится наименование и стоимость самой дорогой игрушки.

Блок-схема алгоритма решения

Блок-схема Form_Load()









Нет



Д а


Схема Form_Load














Нет

Д а











Нет


Да


  1. Текст программы на языке Visual Basic

Dim ToyName(100) As String

Dim ToyPrice(100) As Integer

Dim ToyValue(100) As Integer

Dim ToyMin(100) As Integer

Dim ToyMax(100) As Integer

Dim i As Integer

Private Sub Command1_Click()

Dim N, i3 As Integer

List2.Clear

For N = 0 To i

If ToyPrice(N) <= Text1.Text And ToyMin(N) <= Text2.Text And ToyMax(N) >= Text3.Text Then

List2.AddItem (ToyName(N))

End If

Next N

End Sub

Private Sub Command2_Click()

End

End Sub

Private Sub Form_Load()

Dim Max, NMax, N As Integer

i = -1

Open App.Path + "\data.txt" For Input As #1

Do Until EOF(1)

i = i + 1

Input #1, ToyName(i), ToyPrice(i), ToyValue(i), ToyMin(i), ToyMax(i)

Loop

Close #1

For N = 0 To i

If Max < ToyPrice(N) Then

Max = ToyPrice(N)

NMax = N

End If

Next N

Label9.Caption = Max

Label8.Caption = ToyName(NMax)

For N = 0 To i

If ToyMin(N) <= 3 Then

List1.AddItem (ToyName(N))

End If

Next N

End Sub

  1. Анализ полученного результата

При включении программы в массивы загружаются данные из файла.

Программа находит в массиве самую дорогую игрушку и выводит информацию о ней в Label8 и Label9. Затем из массива выбираются игрушки подходящие детям от 1 до 3 лет и загружаются в List1. При нажатии на кнопку Command1

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

Вывод по проделанной работе

Итак, я выполнил поставленную передо мной задачу. В результате чего научился пользоваться средой Visual Basic серии 6.0. Таким образом, я убедился в возможности довольно просто создавать быстрые Windows-приложения. Освоив принципы визуального, объектно-ориентированного программирования, мною поэтапно была решена типичная для программирования задача: ввод данныхобработка данныхвывод данных.

11


Свежие статьи
Популярно сейчас
Зачем заказывать выполнение своего задания, если оно уже было выполнено много много раз? Его можно просто купить или даже скачать бесплатно на СтудИзбе. Найдите нужный учебный материал у нас!
Ответы на популярные вопросы
Да! Наши авторы собирают и выкладывают те работы, которые сдаются в Вашем учебном заведении ежегодно и уже проверены преподавателями.
Да! У нас любой человек может выложить любую учебную работу и зарабатывать на её продажах! Но каждый учебный материал публикуется только после тщательной проверки администрацией.
Вернём деньги! А если быть более точными, то автору даётся немного времени на исправление, а если не исправит или выйдет время, то вернём деньги в полном объёме!
Да! На равне с готовыми студенческими работами у нас продаются услуги. Цены на услуги видны сразу, то есть Вам нужно только указать параметры и сразу можно оплачивать.
Отзывы студентов
Ставлю 10/10
Все нравится, очень удобный сайт, помогает в учебе. Кроме этого, можно заработать самому, выставляя готовые учебные материалы на продажу здесь. Рейтинги и отзывы на преподавателей очень помогают сориентироваться в начале нового семестра. Спасибо за такую функцию. Ставлю максимальную оценку.
Лучшая платформа для успешной сдачи сессии
Познакомился со СтудИзбой благодаря своему другу, очень нравится интерфейс, количество доступных файлов, цена, в общем, все прекрасно. Даже сам продаю какие-то свои работы.
Студизба ван лав ❤
Очень офигенный сайт для студентов. Много полезных учебных материалов. Пользуюсь студизбой с октября 2021 года. Серьёзных нареканий нет. Хотелось бы, что бы ввели подписочную модель и сделали материалы дешевле 300 рублей в рамках подписки бесплатными.
Отличный сайт
Лично меня всё устраивает - и покупка, и продажа; и цены, и возможность предпросмотра куска файла, и обилие бесплатных файлов (в подборках по авторам, читай, ВУЗам и факультетам). Есть определённые баги, но всё решаемо, да и администраторы реагируют в течение суток.
Маленький отзыв о большом помощнике!
Студизба спасает в те моменты, когда сроки горят, а работ накопилось достаточно. Довольно удобный сайт с простой навигацией и огромным количеством материалов.
Студ. Изба как крупнейший сборник работ для студентов
Тут дофига бывает всего полезного. Печально, что бывают предметы по которым даже одного бесплатного решения нет, но это скорее вопрос к студентам. В остальном всё здорово.
Спасательный островок
Если уже не успеваешь разобраться или застрял на каком-то задание поможет тебе быстро и недорого решить твою проблему.
Всё и так отлично
Всё очень удобно. Особенно круто, что есть система бонусов и можно выводить остатки денег. Очень много качественных бесплатных файлов.
Отзыв о системе "Студизба"
Отличная платформа для распространения работ, востребованных студентами. Хорошо налаженная и качественная работа сайта, огромная база заданий и аудитория.
Отличный помощник
Отличный сайт с кучей полезных файлов, позволяющий найти много методичек / учебников / отзывов о вузах и преподователях.
Отлично помогает студентам в любой момент для решения трудных и незамедлительных задач
Хотелось бы больше конкретной информации о преподавателях. А так в принципе хороший сайт, всегда им пользуюсь и ни разу не было желания прекратить. Хороший сайт для помощи студентам, удобный и приятный интерфейс. Из недостатков можно выделить только отсутствия небольшого количества файлов.
Спасибо за шикарный сайт
Великолепный сайт на котором студент за не большие деньги может найти помощь с дз, проектами курсовыми, лабораторными, а также узнать отзывы на преподавателей и бесплатно скачать пособия.
Популярные преподаватели
Добавляйте материалы
и зарабатывайте!
Продажи идут автоматически
5160
Авторов
на СтудИзбе
439
Средний доход
с одного платного файла
Обучение Подробнее