Тест на языке программирования Visual Basic
Контрольная работа - Компьютеры, программирование
Другие контрольные работы по предмету Компьютеры, программирование
End Sub
Private Sub Command5_Click()
Rem при нажатии на объект Command5 форма окрашивается в зеленый цвет
Form4.BackColor = &HC000&
End Sub
Четвертый этап тестирование созданной формы 4:
1.Исходные данные заполнены в форму правильно.
2.Исходные данные введены не правильно.
Вывод: созданная форма 1 работает верно.
Формы 15,21,22 построены по принципу формы 4, но имеют 1 дополнительный элемент Image.
Форма 7 шестой вопрос.
Первый этап. Визуальное программирование.
В окне Конструктор форм на форму поместим управляющие элементы, которые должны обеспечить взаимодействие приложения с пользователем.
1. Активизируем форму Form7.
2. Установим на форму последовательно 5 объектов класса CommandButton.
3. Установим на форму последовательно 6 объектов класса Label.
4. Установим на форму последовательно 5 объектов класса Image.
Второй этап. Задание значений свойствам объектов
Для объектов Command2, Command3, Command4, Command5 очистим свойство Caption . А затем для каждого объекта формы 7 установим значения согласно таблице:
Класс объектовСвойствоЗначение по умолчаниюНовое значениеCommandButton
Label
Все объекты типа ImageCaptionCommand1Переход к следующему вопросуStyle01 - GraphicalBackColorButton Face&H00C0C0FF&CaptionLabel1Что бы ответить нажмите на соответствующей картинке?Font
Ms Sans Serif, обычный, 8пт10пт, полужирное начертаниеBackStyle10Alignment02CaptionLabel2Какое устройство может оказывать вредное воздействие на здоровье человека?Font
Ms Sans Serif, обычный, 8пт14пт, полужирное начертаниеBackStyle10Alignment02CaptionLabel3МониторFont
Ms Sans Serif, обычный, 8пт12пт, полужирное начертаниеBackStyle
10Alignment
02CaptionLabel4ПринтерFont
Ms Sans Serif, обычный, 8пт12пт, полужирное начертаниеBackStyle
10Alignment
02CaptionLabel5Системный блок
Font
Ms Sans Serif, обычный, 8пт12пт, полужирное начертаниеBackStyle
10Alignment
02CaptionLabel6МодемFont
Ms Sans Serif, обычный, 8пт12пт, полужирное начертаниеBackStyle
10Alignment
02StretchFalseTrue
Пользуясь таблицей, выделяем попеременно нужные объекты и в окне Свойств присваиваем перечисленным свойствам заданные в таблице новые значения.
Третий этап. Создание программного кода.
Общий вид программного кода будет такой:
Private Sub Command1_Click()
Rem здесь идет накопление правильных ответов. Если ответ правильный, то прибавляется 1 балл к предыдущему результату, а если ответ неправильный, то результат остается прежним.
If Image4.BorderStyle = 1 Then Me.Tag = Form6.Tag + 1 Else Me.Tag = Form6.Tag
Rem форма 7 закрывается, форма 8 открывается.
Form7.Hide
Form8.Show
End Sub
Private Sub Image2_Click()
Rem здесь происходит изменение свойства объекта Image, которое называется BorderStyle. При щелчке на Image2 он становится утопленным. Такая же ситуация с Image3, Image4, Image5
Image3.BorderStyle = 0
Image2.BorderStyle = 1
Image4.BorderStyle = 0
Image5.BorderStyle = 0
End Sub
Private Sub Image3_Click()
Image3.BorderStyle = 1
Image2.BorderStyle = 0
Image4.BorderStyle = 0
Image5.BorderStyle = 0
End Sub
Private Sub Image4_Click()
Image3.BorderStyle = 0
Image2.BorderStyle = 0
Image4.BorderStyle = 1
Image5.BorderStyle = 0
End Sub
Private Sub Image5_Click()
Image3.BorderStyle = 0
Image2.BorderStyle = 0
Image4.BorderStyle = 0
Image5.BorderStyle = 1
End Sub
Private Sub Command2_Click()
Rem при нажатии на объект Command2 форма окрашивается в желтый цвет
Form7.BackColor = &HFFFF&
End Sub
Private Sub Command3_Click()
Rem при нажатии на объект Command3 форма окрашивается в красный цвет
Form7.BackColor = &HFF&
End Sub
Private Sub Command4_Click()
Rem при нажатии на объект Command4 форма окрашивается в синий цвет
Form7.BackColor = &HFF0000
End Sub
Private Sub Command5_Click()
Rem при нажатии на объект Command5 форма окрашивается в зеленый цвет
Form7.BackColor = &HC000&
End Sub
Четвертый этап тестирование созданной формы 7:
1.Исходные данные заполнены в форму правильно.
1.Исходные данные введены не правильно.
Вывод: созданная форма 1 работает верно.
Форма 28 итоговая форма
Первый этап. Визуальное программирование.
В окне Конструктор форм на форму поместим управляющие элементы, которые должны обеспечить взаимодействие приложения с пользователем.
1. Активизируем форму Form28.
2. Установим на форму последовательно 1 объект класса CommandButton.
3. Установим на форму последовательно 3 объектов класса Label.
Второй этап. Задание значений свойствам объектов
Для объектов Label1 и , Label3 очистим свойство Caption . А затем для объекта Label1 установим значения согласно таблице:
Класс объектовСвойствоЗначение по умолчаниюНовое значениеCommandButtonCaptionCommand1Переход к следующему вопросуStyle01 - GraphicalBackColorButton Face&H00C0C0FF&LabelCaptionLabel2Вот ваш результат:Font
Ms Sans Serif, обычный, 8пт14пт, полужирное начертаниеBackStyle10Alignment02CaptionLabel1Font
Ms Sans Serif, обычный, 8пт14пт, полужирное начертаниеBackStyle10Alignment02VisibleTrueFalseCaptionLabel3Font
Ms Sans Serif, обычный, 8пт14пт, полужирное начертаниеBackStyle10Alignment02VisibleTrueFalseПользуясь таблицей, выделяем попеременно нужные объекты и в окне Свойств присваиваем перечисленным свойствам заданные в таблице новые значения.
Третий этап. Создание программного