Разработка приложения в среде программирования VISUAL BASIC (стр. 1 из 2)

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

В данной работе необходимо реализовать следующую задачу: создание базы данных по автомобилям. Для разработки приложения я выбрал программу VISUAL BASIC 6.0.

Базами данных (БД) называют электронные хранилища информации, доступ к которым осуществляется с одного или нескольких компьютеров. Обычно БД создается для хранения и доступа к данным, содержащим сведения о некоторой предметной области, то есть некоторой области человеческой деятельности.

Задачи:

· Показ технических характеристик выбранной модели.

· Вывод на экран фотографии автомобиля.

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

Я выбрал этот метод, так как он наиболее эффективен и выполняет поставленную задачу в полной мере.

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

База данных позволяет получить подробные сведения об автомобилях, выставленных на продажу.

Требования к программе:

1. Возможность выбора текстовых данных и просмотра изображений;

2. При функционировании программа должна работать на сравнительно слабых аппаратных ресурсах;

3. При работе с базой данных время отклика программы не должно превышать норм человеко-машинного интерфейса (2-3 сек.)

2 Этапы разработки

Этап первый – Анализ постановки задачи.

Дано задание разработать программу для ознакомления покупателей с товаром.

Целью решения задания является вывод данных запрошенных пользователем

Этап второй – Разработка.

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

Этап третий – Реализация

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

На этом этапе также проводился перевод алгоритма на язык программирования VISUAL BASIC.

Этап четвертый – Тестирование.

На данном этапе проводилась тестирование программы в рабочих условиях в целях определения ее работоспособности, выявлялись недостатки.

Этап пятый – Отладка.

Редко программа начинает работать, так как надо. Это свидетельствует о том, что в программе есть ошибки. На этом этапе проводится процесс поиска и устранения ошибок и повторного тестирования.

3 Назначение и область применения

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

4 Технический проект

Для написания приложения был выбран язык Visual Basic операционной системы Windows.

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

Написание в среде программирования VBA компактно и нетребовательно к аппаратным и программным средствам компьютера, на котором оно используется.

5 Физическая структура программы

В таблице1 представлено описание всех файлов созданных при разработке приложения.

Таблица 1

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

Файл	Характеристика
Project1.vdp	Исходный код проекта. Связывает все файлы, из которых состоит приложение.
Class1.cls	Модуль позволяет реализовать компоненты (свойства, поля, методы, события) класса.
Projectl.exe	Приложение. Содержит исполняемый файл для запуска приложения.
Form1.frm	Файл формы. Содержит в себе элементы управления, диалога и внешнего оформления.

6 Выбор и обоснование языка программирования

Для реализации данной программы в качестве программного средства был выбран объектно-ориентированный язык программирования Visual Basic, в связи с тем, что:

• среда разработки VB включает инструменты для визуального конструирования пользовательского интерфейса;

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

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

- синтаксические ошибки;

- ошибки выполнения;

- ошибки в алгоритме программы.

В моей программе встречались синтаксические ошибки и ошибки в алгоритме.

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

Алгоритмические ошибки трудны для исправления, поскольку никаких сообщений об ошибках не выдается. В поиске и исправлений ошибок программисту может оказать существенную помощь встроенный отладчик в среду разработки приложений Visual Basic.

8 Листинг Form1

Dim av As Class1

Dim v As String

Dim i As Integer, j As Integer

Private Sub Form_Load()

Set av = New Class1 ' av экземпляр класса

Combo1.AddItem "AUDI"

Combo1.AddItem "CITROEN"

Combo1.AddItem "FORD"

Combo1.AddItem "HONDA"

Combo1.AddItem "HYUNDAI"

Combo1.AddItem "JEEP"

Combo1.AddItem "LAND ROVER"

Combo1.AddItem "LEXSUS"

Combo1.AddItem "MITSUBISHI"

Combo1.AddItem "NISSAN"

Combo1.AddItem "PEUGEOT"

Combo1.AddItem "PORSCHE"

Combo1.AddItem "RENAULT"

' заполнение списка ComboBox с именем Combo2 предложениями для

' выбора данных в процедурах Property Get и Property Let

Combo2.AddItem "изображение"

Combo2.AddItem "технические параметры"

Combo2.AddItem "все данные"

End Sub

Private Sub Form_Unload(cancel As Integer)

Set av = Nothing ' удаление объекта из памяти

End Sub

Private Sub Combo1_Click()

Label5.Visible = False ' сделать невидимыми элементы управления Label и Picture

For i = 0 To 12

Picture1(i).Visible = False

Picture2(i).Visible = False

Dim ot As String 'переменная для хранения сообщений

av.firma = Combo1.Text ' значение поля firma объекта av взять из

' списка ComboBox с именем Combo1

av.avto = Option1(0).Value ' значение поля avto объекта av взять

' из поля массива OptionButton

If av.Met1 = True Then

ot = " " & CStr(av.firma) & vbCrLf: ot = ot & " " & vbCrLf

ot = ot & " модель " & CStr(av.model) & vbCrLf: ot = ot & " " & vbCrLf

ot = ot & " цена в $ " & CStr(av.stoim) & vbCrLf: ot = ot & " " & vbCrLf

ot = ot & "Для получения более полной информации обращайтесь к ИНФОРМЕРУ"

MsgBox Title:="Мы можем предложить", Prompt:=ot

Else

Label5.Visible = False

Picture1(Val(av.pict)).Visible = False ' аргумент Picture1: (av.pict)

' определяет индекс элемента массива PictureBox

ot = "Приносим свои извинения, мы даём информацию для желающих купить автомобиль"

MsgBox Title:="Автосалон КОЛЕСНИЦА", Prompt:=ot

End If

End Sub

Private Sub Combo2_Click()

av.varian = Combo2.Text ' см. процедуру Property Let. Присваиваем

' свойству varian значение выбранные из списка ComboBox с именем Combo2

End Sub

Private Sub Command1_Click()

Label5.Visible = False

Label5.Caption = ""

For i = 0 To 12

Picture1(i).Visible = False

Picture2(i).Visible = False

v = av.varian

av.avto = Option1(0).Value

If av.Met1 = True Then

Select Case v

Case "pict"

Picture1(Val(av.pict)).Visible = True

Case "text"

Picture2(Val(av.pict)).Visible = True ' технические характеристики