ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / commondialod всегда = true
4 сообщений из 4, страница 1 из 1
commondialod всегда = true
    #32555970
raur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
raur
Участник
CommonDialog.CancelError всегда = true, даже когда жмешь "отмена"

CommonDialog1.ShowOpen
If CommonDialog1.CancelError = True Then
MsgBox ("...")
Exit Sub
End If

как поймать кнопку "отмена"
...
Рейтинг: 0 / 0
10.06.2004, 12:28
| Ответить | Цитировать | Написать  
commondialod всегда = true
    #32556025
raur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
raur
Участник
почему всегда true я понял
а вот как поймать "отмена" кроме как на on error?
...
Рейтинг: 0 / 0
10.06.2004, 12:42
| Ответить | Цитировать | Написать  
commondialod всегда = true
    #32556027
boevik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
boevik
Гость
Это работает немного по другому
CommonDialog1.CancelError = True - вызывать ошибку при нажатии Cancel и обрабатывается следующим образом:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
On Error GoTo errH
CommonDialog1.CancelError = True
CommonDialog1.ShowOpen
errH:
If Err.Number =  32755  Then
    MsgBox "Canceled"
Else
    MsgBox "Error: " & Err.Number
End If
--------------------------------------------------
Никогда не говори никогда
...
Рейтинг: 0 / 0
10.06.2004, 12:43
| Ответить | Цитировать | Написать  
commondialod всегда = true
    #32556203
raur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
raur
Участник
спасибо
...
Рейтинг: 0 / 0
10.06.2004, 13:53
| Ответить | Цитировать | Написать  
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / commondialod всегда = true
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]