Модератор: BV
Form1.Show vbModal
Declare Function TerminateThread Lib "kernel32" (ByVal hThread As Long, ByVal dwExitCode As Long) As Long
Sanya Z писал(а):Кхе...ты бы хоть иконку прицела на другую поменял, а то что это за плюсик? А также я бы тебе посответовал сделать подсчет процентов попадания, уровни сложности (скорость появления кораблей и т.д.). помню давно сам такое писал
mark+ писал(а):Ндаа. Всё гениальное - просто. END - для выхода.
Или
Unload Form1
Unload Form2
Unload Form...
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Unload me 'Если у тебя всего одна форма
End Sub
Private Sub cmdYes_Click() 'Если хотят поиграть
frmIgra.visible=true
...
Unload Me
end
Private Sub cmdNo_Click() 'Если они потеряли сознание :twisted:
MsgBox "Приходите ещё" 'Это к примеру
Unload Me
end
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Unload me
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
End
End Sub
Danya aka Spiridon писал(а):ВСЁ КАЧАЕМ TIE-FIGHTER V1.0 (FINAL) - http://danya.tumin.net/files/TIE-Fighter%20v1.0.exe!
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 36