ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запустить Private Sub tgbEdit_Click()
27 сообщений из 27, показаны все 2 страниц
  все  
Запустить Private Sub tgbEdit_Click()
    #32257216
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
ну т.е. обработчик контрола на событие Click, а то Toggle Button на Enter не реагирует, а надо сделать шоб реагировал
...
Рейтинг: 0 / 0
05.09.2003, 16:00
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257220
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Может я чего не понял, но по-моему Call вполне подходит :)
...
Рейтинг: 0 / 0
05.09.2003, 16:02
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257223
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
может и подходит, ща почитаю посмотрю
...
Рейтинг: 0 / 0
05.09.2003, 16:04
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257226
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
в принципе подходит....

усложняю задачу как запустить эту херовину из модуля при открытое форме...
...
Рейтинг: 0 / 0
05.09.2003, 16:06
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257228
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Облегчу тебе чтение
Ex:
Call tgbEdit_Click
Причем:
не Private Sub tgbEdit_Click(), а Public Sub tgbEdit_Click() - это, если вызываешь из модуля другой формы
...
Рейтинг: 0 / 0
05.09.2003, 16:07
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257235
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Исправь опечатку, а то не понятно
"открытое" - это "открытой" или "открытии" и тд ? :)
...
Рейтинг: 0 / 0
05.09.2003, 16:08
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257237
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sasha_1
Участник
если из другой формы, то еще надо имячко формы запихать:
Форма.tgbEdit_Click
и call совсем не обязательно.
...
Рейтинг: 0 / 0
05.09.2003, 16:09
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257246
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
Только в случае вызова из другой формы надо поменять в описании процедуры Private на Public
...
Рейтинг: 0 / 0
05.09.2003, 16:14
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257261
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
2 Vsevolod V
при открыто й форме...

sasha_1
это типа что-то Forms!имя_формы.tgbAddE_Click ?
Access'97

2 Geo
эт не гуд...
...
Рейтинг: 0 / 0
05.09.2003, 16:24
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257266
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Я потерял связь событий :))
Что у тебя не получается?
...
Рейтинг: 0 / 0
05.09.2003, 16:26
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257267
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sasha_1
Участник
>это типа что-то Forms!имя_формы.tgbAddE_Click ?
ну да
...
Рейтинг: 0 / 0
05.09.2003, 16:26
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257270
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
твою.... теперь везде на паблик менять

Спасибо всем
...
Рейтинг: 0 / 0
05.09.2003, 16:29
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257282
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
ещё вопросик....

я хочу собирать имя этой процедуры налету, т.е. хочу запускать по типу

Forms.Form(имя_формы)!бла_бла_бла.(имя_процедуры)

можно ли так делать или как нить похоже? если да то как?
...
Рейтинг: 0 / 0
05.09.2003, 16:39
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257293
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
Можно. Используй
Eval "строка путь/имя запускаемой функции/процедуры и параметры"
...
Рейтинг: 0 / 0
05.09.2003, 16:45
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257333
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
ещё вопросики...
Можно ли програмно просмотреть модуль формы?
можноли програмно добавить обработчики событий в виде VBA кода к контролам?
...
Рейтинг: 0 / 0
05.09.2003, 17:12
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257337
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
Охних, ты викторину затеял :)
Набери в редакторе VBA
Forms(1).Module.
и наслаждайся.

Чтобы добавить обработчик, добавляй в текст модуля соответствующий текст, а потом делай
Forms(1).OnMouseMove = "[Event procedure]"
Так, кажеться.

Только почти все это перестанет работать в MDE.
...
Рейтинг: 0 / 0
05.09.2003, 17:18
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257404
Фотография Нуф-нуф
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нуф-нуф
Участник
Сфагнум> я хочу собирать имя этой процедуры налету, т.е. хочу запускать

Гео> Можно. Используй Eval "строка путь/имя запускаемой функции/процедуры и параметры"

Нуф:> или CallByName - она именно для таких вещей заточена...
...
Рейтинг: 0 / 0
05.09.2003, 18:16
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257407
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
2Нуф
Возможно :)
Но у меня и Eval нормально работает :)
...
Рейтинг: 0 / 0
05.09.2003, 18:19
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257493
Фотография Нуф-нуф
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нуф-нуф
Участник
А зато Eval работает значительно медленнее и осмысленность заключённого в нее действия никак вообще не контролируется на этапе компиляции :)~ //это не слюни, а язык!
...
Рейтинг: 0 / 0
05.09.2003, 19:48
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257501
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
Зато в эвал ты можешь написать "Поле = 1+1+1" и это, скорее всего, будет работать в мде. :-P :))
...
Рейтинг: 0 / 0
05.09.2003, 20:00
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257515
Фотография Нуф-нуф
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нуф-нуф
Участник
А зато Eval набрать быстрее чем CallByNa... Стоп-стоп-стоп... Не в те ворота :)

А зато... а зато... а зато CallByName при вызове метода объекта по имени (данный конкретный случай) работает значительно быстрее и осмысленность заключённого в нее действия контролируется на этапе компиляции :)D
...
Рейтинг: 0 / 0
05.09.2003, 20:48
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257522
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Geo
Участник
2Нуф-Нуф

Ладно, сдаюсь!
...
Рейтинг: 0 / 0
05.09.2003, 21:33
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257551
Фотография Нуф-нуф
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Нуф-нуф
Участник
<< //знак, означающий "аналогично" :)
...
Рейтинг: 0 / 0
05.09.2003, 22:36
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257849
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
2 Нуф-Нуф
Зато CallByName отсутствует в 97-м аксесе
...
Рейтинг: 0 / 0
07.09.2003, 21:40
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257990
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Geo писал:Охних, ты викторину затеял :)
Да нет просто у меня решили что Toggle Button должон реагировать на энтер как кнопка, ну или похоже, т.е. нажиматься, а не просто отдавать фокус дальше. А у меня их туева хуча... 80% управления на них... везде дазать прописывать... влом...

Ты победил... ЛП прав, нетути у меня CallByName... :)

2 Нуф-нуф
Ищвени что нигде не упомянул о своей версии...
...
Рейтинг: 0 / 0
08.09.2003, 09:42
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257993
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Ищвени что нигде не упомянул о своей версии...
Не стоит о себе так плохо думать
пост от 5 сен 03, 16:24
...
Рейтинг: 0 / 0
08.09.2003, 09:47
| Ответить | Цитировать | Написать  
Запустить Private Sub tgbEdit_Click()
    #32257997
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
О блин и взаправду.... ну спасибо ЛП утешил, а то я даже не заметил после выходных :)
...
Рейтинг: 0 / 0
08.09.2003, 09:51
| Ответить | Цитировать | Написать  
27 сообщений из 27, показаны все 2 страниц
  все  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запустить Private Sub tgbEdit_Click()
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=45&tid=1679552]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 61ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 64ms
get tp. blocked users:
 2ms
others: 235ms
total:  406ms
созд. / загр.: 406ms
x
x
Закрыть


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