Сабақ жоспары visual-basic 10 класс

Ашылған пішіндер терезесінде Image  көмегімен 2 түрлі суреттің  орнын әзірлейміз

Paint –та  сурет салып көшірмесін  Image  .

Екі суретті бір-біріне беттестіру керек

Private Sub Timer1_Timer()

Image1.Visible = False

Image2.Visible = True

Timer1.Interval = 0

Timer2.Interval = 800

End Sub

Private Sub Timer2_Timer()

Image2.Visible = False

Image1.Visible = True

Timer2.Interval = 0

Timer1.Interval = 800

End Sub