ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с событием на TextBox
15 сообщений из 15, страница 1 из 1
Помогите с событием на TextBox
    #37733746
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Проблема такая. У меня в форме есть TextBox. В него я ввожу дату (21.03.12) на Текстбоксе висит событие "change" и запускается процедура:

Код: vbnet
1.
2.
3.
4.
5.
Private Sub Calendar1_change() 

    Valuta ' запускается макрос валют

End Sub



Проблема в том, что макрос Valuta начинает запускаться сразу, как только я начинаю вводить первую цифру даты и выскакивает ошибка. А хотелось бы, чтобы макрос Valuta запускался после ухода из Текстбокса TAB или Enter или просто активировав другой элемент управления. Пробовал цеплять различные события на TextBox, но кроме change ничего не работает.

Книги:
VB 6.0 Microsoft
VBA 2003 Кузьменко

Не помогли...
Может посоветуете что с фокусом?
Спасибо.
...
Рейтинг: 0 / 0
01.04.2012, 20:50
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733754
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
LostFocus
...
Рейтинг: 0 / 0
01.04.2012, 20:56
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733803
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Попробовал,

Код: vbnet
1.
2.
3.
4.
5.
Private Sub Calendar1_LostFocus () 

    Valuta ' запускается макрос валют

End Sub



не срабатывает... Я правильно сделал?
...
Рейтинг: 0 / 0
01.04.2012, 21:52
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733813
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Сделал правильно, должно срабатывать на уход по Tab и мышой. Для Enter-а надо отдельно отрабатывать KeyDown
...
Рейтинг: 0 / 0
01.04.2012, 22:03
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733847
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
У меня поле TextBox имеет 8 знаков (04.03.12) Как только я набираю 8-й знак активируется следующее поле (фокус на него перекидывается). Поэтому клавишей ТАБ воспользоваться не могу... А мне бы как раз на это событие процедуру бы запустить... Если будут мысли, озучьте пожалуйста.

За ответы спасибо.
...
Рейтинг: 0 / 0
01.04.2012, 22:26
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733849
скуоктища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скуоктища
Гость
> Valll
> не срабатывает... Я правильно сделал?

Если "не срабатывает" == "процедура Calendar1_LostFocus не вызывается", то неправильно.

Алёшенька, а ты где камушек взял? (с)

TextBox из какой библиотеки, не Microsoft Forms 2.0 Object Library часом ?
...
Рейтинг: 0 / 0
01.04.2012, 22:28
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733850
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
а с какого перепугу перекидывается фокус? Вообще, начнем с того, о какой среде речь идет, а то текстбоксы - они ведь разные в разных средах, а тот помянуто почему-то и VB6 и VBA
...
Рейтинг: 0 / 0
01.04.2012, 22:29
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733851
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
скуоктища, ага, вот и я о том
...
Рейтинг: 0 / 0
01.04.2012, 22:30
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733868
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Форма сделана в VBA. TextBox c панели ToolBox (Controls)... Вы меня пугаете... со времён разработки календаря меня дёргает от упоминания

"TextBox из какой библиотеки, не Microsoft Forms 2.0 Object Library часом ? "

или опять что не так?
...
Рейтинг: 0 / 0
01.04.2012, 22:45
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733876
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Вот, на всякий случай все параметры Текстбокса в картинке.
...
Рейтинг: 0 / 0
01.04.2012, 22:51
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733886
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
> Valll
> или опять что не так?

Угу. Не так. Не занешь, с какими элементами управления работаешь.
...
Рейтинг: 0 / 0
01.04.2012, 22:59
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733927
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Спасибо за ликбез.

Сделал так...

Код: vbnet
1.
2.
3.
Private Sub Calendar1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Valuta
End Sub



Не работает... Ладно, что вам со мной время терять. Туплю видимо сильно...

Спасибо за ответы.
...
Рейтинг: 0 / 0
01.04.2012, 23:30
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733940
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Победа!!!

Скукотище, спасибо тебе за показанный список событий!

Заработало так:

Код: vbnet
1.
2.
3.
4.
5.
Private Sub Calendar1_AfterUpdate()

Valuta

end sub
...
Рейтинг: 0 / 0
01.04.2012, 23:38
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37733947
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Valll,
поздравлямс! ))

ЗЫ: странно, что onExit не сработало.
...
Рейтинг: 0 / 0
01.04.2012, 23:43
| Ответить | Цитировать | Написать  
Помогите с событием на TextBox
    #37734012
TpaBka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TpaBka
Участник
[quot Valll]У меня поле TextBox имеет 8 знаков (04.03.12) [quot]
да же после хорошо проведенных выходных у меня получается 10 знаков
наверно надо идти спать
...
Рейтинг: 0 / 0
02.04.2012, 01:29
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с событием на TextBox
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&gotonew=1&tid=2157932]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 29ms
get topic data:
 13ms
get first new msg:
 7ms
get forum data:
 3ms
get page messages:
 57ms
get tp. blocked users:
 2ms
others: 321ms
total:  462ms
созд. / загр.: 462ms
x
x
Закрыть


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