Visual Basic. Практическая работа Прогноз погоды

Раздел Информатика
Класс -
Тип Другие методич. материалы
Автор
Дата
Формат doc
Изображения Есть
For-Teacher.ru - все для учителя
Поделитесь с коллегами:


VISUAL BASIC

Практическая работа «Прогноз погоды»



Visual Basic. Практическая работа Прогноз погоды



Ход работы;

1. На форме установить Image1, Image2, Image3, Label1, Label2, Picture1, Picture2, Picture3, Timer1, Timer2

2. Label2 - Caption - «ПРОГНОЗ ПОГОДЫ»

3. Timer1 - Interval -200, Timer2- Interval -400

Private Sub Image1_Click()

Label1.ForeColor = vbRed

Label1.Caption = "Ожидается солнечная погода, возьмите панаму"

Picture1.Visible = True

Picture2.Visible = False

Picture3.Visible = False

End Sub

Private Sub Image2_Click()

Label1.ForeColor = vbBlue

Label1.Caption = "Ожидается дождь, возьмите зонт "

Picture2.Visible = True

Picture1.Visible = False

Picture3.Visible = False

End Sub

Private Sub Image3_Click()

Label1.ForeColor = vbGreen

Label1.Caption = "Ожидаются морозы, оденьтесь потнплее"

Picture2.Visible = False

Picture1.Visible = False

Picture3.Visible = True

End Sub

Private Sub Timer1_Timer()

Label2.Visible = True

End Sub

Private Sub Timer2_Timer()

Label2.Visible = False

End Sub


© 2010-2022