57

Описание выполнения Задания 1

Название работы: Задание1.

Тема работы: Линейные вычислительные процессы.

Цель работы: Программирование линейных вычислительных процессов и ознакомление с основными способами ввода исходных данных.

На чистой дискете создаем папку под названием Задание1.

Открываем новый проект. В окне свойств задаем свойства формы в соответствии с таблицей:

Объект	Свойство	Значение свойства
Форма	Name Caption	frmZ1r Линейные вычислительные процессы

Располагаем на форме 3 метки. В окне свойств задаем их свойства в соответствии с таблицами:

Объект	Свойство	Значение свойства
Метка	Name Caption Alignment Font	Label1 1-ое число Центровка Times New Roman, жирный, размер 12
Метка	Name Caption Alignment Font	Label2 2-ое число Центровка Times New Roman, жирный, размер 12
Метка	Name Caption Alignment Font	Label3 Результат Центровка Times New Roman, жирный, размер 12

.

Под каждой из этих меток располагаем текстовые окна. В окне свойств задаем их свойства в соответствии с таблицей:

Объект	Свойство	Значение свойства
Текстовое окно	Name Alignment Font	Text1 Центровка Times New Roman, жирный, размер 18
Текстовое окно	Name Alignment Font	Text2 Центровка Times New Roman, жирный, размер 18
Текстовое окно	Name Alignment Font	Text3 Центровка Times New Roman, жирный, размер 18

У каждого их текстовых окон в окне свойств очищаем свойство Text.

Между соседними текстовыми окнами на их же уровне размещаем 2 метки.

В окне свойств задаем их свойства в соответствии с таблицей:

Объект	Свойство	Значение свойства
Метка	Name Caption Alignment Font	Label4 “+” Центровка Times New Roman, жирный, размер 18
Метка	Name Caption Alignment Font	Label5 “=” Центровка Times New Roman, жирный, размер 18

Под первыми двумя текстовыми окнами располагаем полосы прокрутки (элементы HScrollBar ). В окне свойств задаем их свойства в соответствии с таблицей:

Объект	Свойство	Значение свойства
Полоса прокрутки	Name Min Max	HScroll1 0 100
Полоса прокрутки	Min Max Name	HScroll2 0 100

Ниже полос прокрутки помещаем достаточно длинную метку. В окне свойств задаем ее свойства в соответствии с таблицей:

Объект	Свойство	Значение свойства
Метка	Name Caption Alignment Font	Label6 Способы ввода исходных данных Центровка Times New Roman, жирный, размер 18

Под этой меткой размещаем 4 командные кнопки. В окне свойств задаем их свойства в соответствии с таблицей:

Объект	Свойство	Значение свойства
Командная кнопка	Name Caption Font	Command1 1-ый способ Times New Roman, жирный, размер 12
Командная кнопка	Name Caption Font	Command2 1-ой способ Times New Roman, жирный, размер 12
Командная кнопка	Name Caption Font	Command3 1-ий способ Times New Roman, жирный, размер 12

И, наконец, под этими командными кнопками располагаем еще одну командную кнопку. В окне свойств задаем ее свойства в соответствии с таблицей:

Объект	Свойство	Значение свойства
Командная кнопка	Name Caption Font	Command4 Выход Times New Roman, жирный, размер 12

На этом проектирование интерфейса приложения завершено. Сохраняем проект. Для этого в окне проводника проекта выделяем файл формы и выбираем в меню “Файл” пункт “Сохранить форму как…”. Открывается окно браузера, в котором переходим на диск “A”, выбираем созданную папку “Задание1” и нажимаем кнопку “Сохранить”. Затем в окне проводника проекта выделяем файл проекта. Снова раскрываем в меню пункт “Файл”. Теперь там будет представлен пункт “Сохранить проект как…”. Выбираем его и в открывшемся окне браузера поступаем так же, как делали при сохранении формы.

Приступаем к программированию решения задачи. Для этого переходим на нашу дискету и раскрываем папку “Задание1”. В ней содержатся 3 файла: frmZ1z.frm, Проект1.vbp и Проект1.vbw. Основным файлом проекта является файл с расширением vbp. Именно он осуществляет вызов интегрированной среды Visual Basic для нашего проекта и позволяет доработать проект и выполнить наше приложение. Поэтому дважды щелкаем по файлу Проект1.vbp. В результате входим в среду VB. В окне проводника проекта выбираем файл формы и в верхней строке окна выбираем закладку “Показать форму”. На экране появляется наша форма.

Программирование решения задачи при первом способе ввода

исходных данных.

Дважды щелкаем мышкой по первой командной кнопке. Открывается окно кода с заготовкой процедуры обработки события Click для этой командной

кнопки:

Private Sub Command1_Click()

End Sub

Начало и конец процедуры разделены пустой строкой. Вносим туда код так, чтобы в результате получилось:

Private Sub Command1_Click()

Text3.Text = Str(Val(Text1.Text) + Val(Text2.Text))

End Sub

Программирование решения задачи при втором способе ввода

исходных данных.

Закрываем окно кода и на форме дважды щелкаем по первой полосе прокрутки. В заготовку процедуры обработки события Change полосы прокрутки вносим код:

Private Sub HScroll1_Change()

Text1.Text = Str(HScroll1.Value)

End Sub

Закрываем окно кода и на форме дважды щелкаем по второй полосе прокрутки. В заготовке ее процедуры:

Private Sub HScroll2_Change()

End Sub

меняем название события Change на Scroll и вносим в процедуру код, чтобы в результате получилось:

Private Sub HScroll2_Scroll()

Text2.Text = Str(HScroll2.Value)

End Sub

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

Вносим в нее код так, чтобы получилось:

Private Sub Command2_Click()

Text3.Text = Str(HSCroll1.Value + HScroll2.Value)

End Sub

Программирование решения задачи при третьем способе ввода

исходных данных.

Снова закрываем окно кода и дважды щелкаем по 3-ей командной кнопке. В появившуюся в открывшемся окне кода заготовку процедуры для 3-ей командной кнопки вносим код, чтобы получилось:

Private Sub Command3_Click()

Dim a As Integer, b As Integer, n As Integer

a = InputBox(”Введите 1-ое число”)

Text1.Text = Str(a)

b = InputBox(“Введите 2-ое число”)

Text2.Text = Str(b)

n = a + b

Text3.Text = Str(n)

End Sub

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

Private Sub Command3_Click()

End

End Sub

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

Порядок действий для выполнения приложения.

Первый способ ввода исходных данных:

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

Второй способ ввода исходных данных:

Снова запускаем приложение на выполнение щелчком по значку треугольника на линейке инструментов. На этот раз перемещаем ползунок первой полосы прокрутки на некоторое расстояние. После отпускания клавиши мышки в первом текстовом окне отобразится значение свойства Value первой полосы прокрутки. Это и будет значением первого введенного числа. После этого перемещаем ползунок второй полосы прокрутки. По мере его перемещения во втором текстовом окне непрерывно меняются числа. Это работает процедура обработки события Scroll второй полосы прокрутки. Останавливаем ползунок, когда посчитаем, что желаемое значение второго числа уже достигнуто. Остается щелчком по второй командной кнопке решить задачу при полученных значениях чисел. Щелчком по четвертой командной кнопке снова завершаем работу приложения.

Третий способ ввода исходных данных:

Снова запускаем приложение на выполнение. На этот раз сразу щелкаем по третьей командной кнопке. На экране появится окно ввода с просьбой ввести первое число. На клавиатуре набираем желаемое число и либо нажимаем клавишу Enter, либо щелкаем по кнопке Ok в окне ввода. Снова появится окно ввода с просьбой ввести второе число. Аналогично предыдущему вводим и его. Посмотрев результат, щелчком по четвертой командной кнопке завершаем работу приложения.

Теперь добавим к проекту еще одну форму: форму заставку. Для этого выполняем: “Проект/добавить форму”. На экране появится новая пустая форма. Щелкаем на ней и в окне свойств меняем ее имя на frmZ1z. Размещаем на ней метку и одну командную кнопку. В окне свойств метки меняем ее свойство Caption. Для этого, щелкнув в поле справа от имени этого свойства, клавишей Del вытираем стоящее там слово Label1 и вводим: Задание 1. Метку следует рисовать достаточно большой (почти во всю ширину формы). В окне свойств метки устанавливаем свойство Font ( начертание, плотность и размер шрифта). Теперь в окне свойств устанавливаем значение свойства BackStyle равным “Прозрачно”, После этого сохраняем файл формы, используя пункт меню “Файл/Сохранить форму как…” . Щелчком на пиктограмме дискеты сохраняем изменения в нашем проекте. Выходим из проекта и копируем в папку проекта какой-либо графический файл (с расширением jpg). В окне проводника проекта щелкаем на файле формы-заставки, затем там же - на вкладке “Показать объект”. Форма-заставка появится на экране. В окне ее свойств щелкаем на свойстве Picture и затем на появившемся значке троеточия. Откроется окно браузера, в котором будет представлен скопированный в папку проекта графический файл. Щелкаем на его имени и затем не кнопке “Открыть”. На форме немедленно появится изображение из графического файла. Остается запрограммировать нашу командную кнопку. Для этого дважды щелкаем на ней и в появившуюся заготовку процедуры записываем код так, чтобы получилось:

Private Sub Command1_Click()

frmZ1z.Hide

frmZ1r.Show

End Sub

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

Задание1 полностью выполнено. Можно запускать приложение на выполнение.

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

1. Название работы (Задание1), тема работы (Линейные вычислительные процессы), цель работы (Программирование линейных вычислительных процессов и ознакомление с основными способами ввода исходных данных).

2. Нарисованное от руки изображение формы с расположенными на ней элементами управления.

3. Сводная таблица использованных свойств формы и элементов управления.

4. Таблица используемых в приложении переменных. Для данного задания она должна иметь вид:

Переменная	Тип данного	Значение	Смысл переменной
a	Integer	вводится	Первое число
b	Integer	вводится	Второе число
n	Integer	вычисляется	Результат вычислений

5. Коды процедур для формы. Для данного задания все они приведены выше.

В следующих заданиях иногда в проекте будет требоваться

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

Важное замечание: В этой и всех следующих заданиях сразу после появления на экране пустой готовой к разработке формы, необходимо дать ей новое имя: такое, какое предлагается в описаниях выполнения заданий. Например, frmZ1z для формы-заставки и frmZ1r для рабочей формы. Это связано с тем, что в последнем 8 задании будет необходимо формы всех заданий сбрасывать в отдельную папку, а, как известно, в одной и той же папке не могут находиться формы с одинаковыми именами.

Для того, чтобы защитить данную работу необходимо знать ответы на

следующие вопросы:

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

2. Что такое свойство объекта, и какими способами можно задать значения свойств?

3. Что такое переменная, и какие типы данных существуют в VB?

4. Что такое событие, и какие основные события связаны с формой и использованными элементами управления?

5. В чем заключается процесс разработки пользовательского интерфейса проекта?

6. Что такое процедура обработки события и как она записывается?

7. Определение оператора и назначение операторов Dim и присваивания значений переменным и свойствам объектов.

8. Как открыть новый проект и каковы этапы процесса его сохранения.

Желаю успешной защиты Задания 1!