Реферат: Игра на ловкость Змейка

AboutAvtor.Show

End Sub

-------------------------------------------------------------------------------------------------

‘Обработка нажатий кнопок

Private Sub Exit_Click()

КнопкаВыход_Click

End Sub

Private Sub NewGame_Click()

КнопкаПовторить_Click

End Sub

Private Sub КнопкаВыход_Click()

Unload Форма_Змейка

Unload Me

End Sub

Private Sub КнопкаПовторить_Click()

Форма_Змейка.Enabled = True

Форма_Змейка.Form_Load

ИнформационнаяФорма.Hide

End Sub

AboutAvtor

‘Закрытие формы щелчко кнопки мышы по фотографии

Private Sub Image1_Click()

ИнформационнаяФорма.Enabled = True

Unload Me

End Sub

Module1

Option Explicit

‘Создаем новый тип переменной

Public Type Змея