Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Отключить событие на форме. Как? / 7 сообщений из 7, страница 1 из 1
29.03.2010, 17:08
    #36548686
DMK67
DMK67
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Отключить событие на форме. Как?
Хочу разобраться как на User Form отключить событие возникающее при отпускании клавиши при активированном Textbox1
т.е. Private Sub TextBox1_KeyUp...
А еще хочу на учиться отключать Private Sub TextBox1_Change...
А еще...
А еще никаким образом не удается отключить срабатывание для форм комбинаций клавиш:
Alt-Tab , Ctrl-Alt-Del и Alt-F4.

Уважаемый ZVI на Планете -Эксель объяснил что формы, мягко выражаясь, вообще к экселю никаким боком не касаются и по каждому вопросу имеют свое отдельное "мнение" и на Application.EnableEvents = False не реагируют по задумке своих создателей.

Идеи есть? Хоть дайте направление где рыть...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2010, 17:26
    #36548745
f
f
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Отключить событие на форме. Как?
Рыть в сторону языков программирования, предназначенных для создания графического интерфейса, а не для обработки электронных таблиц.
Но вы, конечно, тоже не послушаетесь.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2010, 17:49
    #36548803
ZVI
ZVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Отключить событие на форме. Как?
Стандартный метод - ввести логическую переменную занятости и проверять ее в начале кода события.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
' Код формы

Dim Busy As Boolean

Private Sub TextBox1_Change()
  
  ' В режиме занятости - выйти
  If Busy Then Exit Sub
  
  ' Взводим флажок занятости
  Busy = True
  
  ' Что-то делаем, например, меняем TextBox2
  ' но при этом код TextBox1_Change отвалится на своей 1-й строчке из-за Busy
  TextBox2 = TextBox2 & TextBox1
    
  ' Опускаем флажок  занятости
  Busy = True
  
End Sub

Private Sub TextBox2_Change()
  
  ' В режиме занятости - выйти
  If Busy Then Exit Sub
  
  ' Взводим флажок  занятости
  Busy = True
  
  ' Что-то делаем
  ' ...
    
  ' Опускаем флажок  занятости
  Busy = True
  
  
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2010, 17:52
    #36548814
ZVI
ZVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Отключить событие на форме. Как?
Опечатка в 2-х местах, в конце процедур должно быть:
Код: plaintext
1.
2.
' Опускаем флажок  занятости
  Busy = False
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2010, 17:55
    #36548825
ZVI
ZVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Отключить событие на форме. Как?
DMK67А еще никаким образом не удается отключить срабатывание для форм комбинаций клавиш: Alt-Tab , Ctrl-Alt-Del и Alt-F4
А это можно только с помощью API
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.03.2010, 09:10
    #36549674
big-duke
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Отключить событие на форме. Как?
DMK67 А еще никаким образом не удается отключить срабатывание для форм комбинаций клавиш:
Alt-Tab , Ctrl-Alt-Del и Alt-F4.


VB Coding Tip: Disabling Ctrl-Alt-Delete and Ctrl-Esc
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.03.2010, 17:09
    #36551096
DMK67
DMK67
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Отключить событие на форме. Как?
Огромное спасибо, а про ALT-F4 - поищу сам...ежели не найду, то опять обращусь...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Отключить событие на форме. Как? / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 459ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2178296]:
 0ms
get settings:
 9ms
get forum list:
 17ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 152ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 46ms
get tp. blocked users:
 2ms
others: 211ms
total:  459ms
x
x
Закрыть


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