Модераторы: diadiavova, gambit
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> не хочет выходить из приложения! Application.Exit() 
:(
    Опции темы
HellMasterHaiL
Дата 16.4.2007, 17:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 181
Регистрация: 9.8.2006
Где: Россия, МО, г. Юб илейный

Репутация: нет
Всего: 1
в общем есть цикл:
Код

Dim lcMess As String = "\=-)"
        While lcMess <> Nothing
            lcMess = Control()
            If lcMess <> Nothing Then
                MessQuery(lcMess)
            End If
        End While

процедура MessQuery:
Код

Private Function MessQuery(ByVal mess As String) As Boolean
        Dim msg As DialogResult = MessageBox.Show(mess & Chr(10) & Chr(13) & "Исправить подключение к БД ?", "", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        Select Case msg
            Case Windows.Forms.DialogResult.Yes
                Dim sdCon As New SDConnect
                sdCon.NewConnectSQL()
                My.Settings.connStr = sdCon.StrConnectSQL
            Case Windows.Forms.DialogResult.No
                Application.Exit()
        End Select
    End Function

когда функция Control() возвращает мне не пустую строку, то вызывается процедура MessQuery... на вопрост процедуры я отвечаю НЕТ!
после этого начинается самое интересное:
при компиляции, после нажатия клавиши НЕТ начинает окно программы мигать в бешанном ритме!
при пошаговом прохождении после строки Application.Exit() не происходит завершение работы приложения, а наоборот, прицедура заканчивает свою работу, возвращается в цикл и он повторяется много-много раз, сволочь)

почему не происходит завершение работы программы?

Это сообщение отредактировал(а) HellMasterHaiL - 16.4.2007, 17:38
PM MAIL ICQ   Вверх
Exception
Дата 16.4.2007, 17:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 18
Всего: 186
Application.Exit () прерывает цикл обработки сообщений приложения, но не завершает же его!
Чтобы приложение завершилось, тебе нужно сначала выйти из цикла.

Почему ShowMess () объявлена как функция, но ничего не возвращает?
PM   Вверх
HellMasterHaiL
Дата 16.4.2007, 18:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 181
Регистрация: 9.8.2006
Где: Россия, МО, г. Юб илейный

Репутация: нет
Всего: 1
Exception, ну не суть важно как она объявлена (думаю), напишу приват саб!
на сколько я понимаю application.exit должна завершить работу программы! или нет?
PM MAIL ICQ   Вверх
Exception
Дата 16.4.2007, 18:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 18
Всего: 186
Цитата(HellMasterHaiL @  16.4.2007,  19:00 Найти цитируемый пост)
ну не суть важно как она объявлена (думаю), напишу приват саб!


А, тогда понятно. Тогда объяви её как Function As AppDomain или ещё почуднее, ведь это тебе придётся когда-нибудь разбираться в своём дурнонаписанном коде, не мне же smile .


Цитата(HellMasterHaiL @  16.4.2007,  19:00 Найти цитируемый пост)
на сколько я понимаю application.exit должна завершить работу программы! или нет? 


Хьюстон, Хьюстон, как нас слышите?


Цитата(Exception @  16.4.2007,  18:50 Найти цитируемый пост)
Application.Exit () прерывает цикл обработки сообщений приложения, но не завершает же его!
Чтобы приложение завершилось, тебе нужно сначала выйти из цикла.
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума VB .NET
diadiavova
  • Прежде чем задать вопрос, воспользуйтесь поиском: возможно Ваш вопрос уже обсуждался и на него был получен ответ.
  • Если такой же вопрос не найден, не стоит задавать свой вопрос в любую тему, создайте новую.
  • Заголовок темы должен отображать ее суть.
  • Содержание поста должно описывать проблему понятно, но в то же время, по возможности, лаконично. Сначала следует описать суть вопроса, потом можно привести пример кода, не вынуждайте других участников угадывать в чем Ваша проблема - телепатов здесь нет.
  • Будьте взаимно вежливы и дружелюбны.
  • При оформлении сообщений используйте форматирование, примеры кода заключайте в теги [CODE=vbnet][/CODE].
  • Также ознакомьтесь с общими правилами, действующими на всем форуме.
  • Если вопрос решен, не забывайте помечать тему решенной(вверху темы есть ссылка). Кроме того, если Вы хотите отблагодарить участников, оказавших помощь в решении, можно повысить им репутацию, в случае, если у Вас менее 100 сообщений в форуме и функция изменения репутации Вам недоступна, можете написать сюда.
  • Общие вопросы по программированию на платформе .NET обсуждаются здесь.
  • Литература по VB .NET обсуждается здесь.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, diadiavova.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB .NET | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0433 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.