Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Ошибка системы мпри выхода из программы Добавлено: 20.08.07 11:23  

Автор вопроса:  Игорь | ICQ: 457394129 
Подскажите пожалуйсто, когда я пытаюсь выйти из программы через END, то программа закрывается и выскакивает системная ошибка которая предлагает отправить отчёт об ошибке в мелкософт?

Вот процедура:
Form1.CMD.Text = "ex"
Select Case MsgBox("Вы действительно хотите покинуть программу?", 36, "Visual Studio Plan")
Case 6 ' Да

'Выключаем слежение за скролом колеса мыши:
Call UnHook(Me.hWnd)
Call UnHook(Main.hWnd)

If Form1.EList.ListCount <> 0 Then
Select Case MsgBox("Вы хотите сохранить изменения?", 52, "Visual Studio Plan")
Case 6 ' Да
If Form1.SaveUrl.Text <> "" Then
SaveP
End
Else
Form5.Show vbModal
End
End If

Case 7 ' Нет
Cancel = 0
End
End Select
End If

Case 7 ' Нет
Cancel = 1
End Select

End Sub


Такая штука происходит только когда я внёс изменения в проект и при вопросе созранить нажимаю "Нет"!

Данная форма находится внутри MDI-формы и этот код срабатывает при закрытии её (тоесть когда я закрываю главную МДИ форму!

Ответить

  Ответы Всего ответов: 6  

Номер ответа: 1
Автор ответа:
 Mr.Smile



ICQ: 427682013 

Вопросов: 14
Ответов: 464
 Профиль | | #1 Добавлено: 20.08.07 15:12
Попробуй через
Unload [имя формы]

Например
Unload Me

Ответить

Номер ответа: 2
Автор ответа:
 Игорь



ICQ: 457394129 

Вопросов: 52
Ответов: 133
 Профиль | | #2 Добавлено: 20.08.07 17:16
Пробовал, всёравно выскакивает ошибка!

Ответить

Номер ответа: 3
Автор ответа:
 Softer



ICQ: 203660381  

Вопросов: 29
Ответов: 205
 Web-сайт: hware.org.ua
 Профиль | | #3
Добавлено: 20.08.07 17:53
поробуй не писать cancel=0
может поможет...

Ответить

Номер ответа: 4
Автор ответа:
 Игорь



ICQ: 457394129 

Вопросов: 52
Ответов: 133
 Профиль | | #4 Добавлено: 20.08.07 17:55
Не не поможет, это я подписал перед тем как создать тему!

Ответить

Номер ответа: 5
Автор ответа:
 Alexandrus



ICQ: 496782368 

Вопросов: 18
Ответов: 312
 Web-сайт: starsorion.com
 Профиль | | #5
Добавлено: 20.08.07 22:21
Даже и не хочу разбираться с кодом. Выход по End - это не есть гут,совсем не гут! Отследи ,что выгружены все объекты перед выходом из проги...
Set имя объекта=Nothing
и Form_Unload...

Ответить

Номер ответа: 6
Автор ответа:
 Alexandrus



ICQ: 496782368 

Вопросов: 18
Ответов: 312
 Web-сайт: starsorion.com
 Профиль | | #6
Добавлено: 20.08.07 22:29
ЗЫ.Думаю скорее всего у тебя проблемы с хуками...

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам