5.Обработка ошибок
Для минимизации ошибок были учтены следующие рекомендации:
На каждой форме были объявлены все переменные;
Соблюдение последовательности при объявлении переменных;
Не был использован тип Object;
4. Сохранялась структура алгоритмов.
Пользователь сам вводит фамилию, моя система такова, что он не сможет этого не сделать, или ввести данные цифрами. Данный код представлен в первой UserForm.
If TextBox1.Value = "" And TextBox2.Value = "" Then 'обработка ошибок, если пользователь не задал своё имя
x = MsgBox("Пожалуйста, введите имя и фамилию!", vbExclamation, "Ошибка")
Else
UserForm2.Show
End If
Private Sub TextBox1_Change() 'обработка ошибок, не даёт пользователю вводить цифры в текстовое поля для ввода имени
If IsNumeric(TextBox1.Value) Then
TextBox1.Value = ""
End If
End Sub
Private Sub TextBox2_Change() 'обработка ошибок, не даёт пользователю вводить цифры в текстовое поля для ввода имени
If IsNumeric(TextBox2.Value) Then
TextBox2.Value = ""
Далее система автоматизирована.
6. Тестирование
Мою экспертную систему тестировали студенты 2го курса группы 23721/4:
Большакова Анастасия
Папко Кристина
Исакова Елизавета
Кузнецов Максим
Сухоруков Стас
Ильина Алена
Проанализировав все отзывы ребят ребят, я пришёла к выводу:
1. Интерфейс скучный
2. Можно не вводить имя
4. Мелкий шрифт, приходилось приглядываться.
Все свои ошибки и пожелания ребят я учла и исправила:
1. Добавила картинок (веселее интерфейс)
2. Исправила необходимость ввода имени
3. Увеличила шрифт.
В большинстве случаев ЭС давала совет, с которым пользователи соглашались. Музыкальный жанр, который им рекомендовалось послушать, либо был любимым музыкальным направлением, либо они часто слушали такую или похожую музыку. Однако я считаю, что ЭС «Музыкальные жанры» могла бы давать более правильный совет, если количество вопросов увеличить в 2-3 раза, но так как время создания ЭС ограничено, то она содержит всего 10 вопросов. В будущем возможна доработка.
Заключение
Экспертная система «Музыкальные жанры» работает в соответствии со своим назначением. Она выполняет поставленную цель в 70% из 100%. Хотя данную экспертную систему и сложно оценить в правильности работы, так как она дает рекомендацию по прослушиванию того или иного музыкального жанра, и каждый пользователь в праве согласиться с данным советом или нет.
Цель курсовой работы и цель экспертной системы выполнены. Недостатки системы были изложены выше. Достоинством своей системы я считаю понятный, простой интерфейс, возможность дальнейшего совершенствования системы и актуальность темы.
Список использованных источников
1. Портал искусственного интеллекта [Электронный ресурс] / Разработка экспертных систем. URL: http://www.aiportal.ru/articles/expert-systems/development-expsys.html/[Дата обращения:15.12.2013]
2. Лекции по дисциплине «Информационные технологии управления»