Приветствую, коллеги! Есть ли способ выделять текст в контроле формы с числовым типом данных? Обычный способ, как для текстовых типов, навроде


в событии GotFocus этого поля не работает.

Имелось ввиду не выделение цветом, а выделение текста (sel) для редактирования/копирования


в том-то дело, нужно по тычке ЛКМ, аналогично тому коду, что я указал в первом посте

Ситуация такая: на подчиненной форме ленточного типа при передаче фокуса в поле с числовым типом данных дефолтовый нолик не отображается, а при вводе конкатенится к введенному значению. Т.е. вбиваешь "5", получаешь "50". Доводит юзеров до трясучки. Я обработал события контролла: в GotFocus меняю 0 (если значение просто 0) на vbNullString, а в LostFocus - наиборот. Все работает как надо, но только в сохраненных записях, а в новой не фурычит. А именно при добавлении новой записи с сим раздражающим моментом в основном и приходится иметь дело. Приучить юзеров к табуляции клавой - так же как кота ходить на унитаз и пользоваться сливным механизмом. Т.е. 1 из 1000. Бухгалтерия, операторы любят таб и ентер, а вот кое-то стоящий повыше предпочитает сидеть развалившись в кресле, держась одной рукой за чашку с кофе или какую-нибудь часть тела, а другой пощёлкивать не спеша мышкой. Ну, я думаю, вы знаете)))

Выделяется при двойном клике ЛКМ, но это тоже не привьёшь. Может есть способ назначить вместо Click эффект DoubleClick, но только чтоб исключительно в этом контролле?

Да знаю я. Одиночный клик, к примеру, может понадобиться для установки текстового курсора в это поле. Это я немного не додумав, булькнул. Но воз и ныне там... Наверняка, у меня одного такая проблема возникла. У меня маловато опыта и знаний для обозрения возможностей vba. Может я зря вообще привязался к этому выделению текста... Кстати, добавил msgbox в обработку события GotFocuse


в новой записи - тишина, не появляется msgbox, т.е. проверку на 0 поле вообще не проходит

Короче, проверил еще и так:

f
В сохраненной записи определяется как 0, в новой уходит в ветку IsNull. Из чего вывод: в обработку события GotFocus добавляю и это условие:


Выглядит абсурдно, но всё заработало! Проблема решена)) Т.е. до события GotFocus текстбокса поле все-таки пустое, а нулик туда акс лепит уже в событии Dirty, ну как-то так

пригодится еще не раз

sdku,
Ну здрассссьте, приехали. Тут как раз-таки этот нолик нужен. Мешался-то он только в время ввода данных в поле-источник. Потому я и возвращал его в событии "лост фокус". Конечно, в дальнейшем можно прикрыть пустые значения с помощью Nz везде, где понадобится. Или запросом на апдейт заменить на 0. Но все же... душе спокойней, когда данные в должном виде хранятся))

На самом деле таких полей 16. В каждой записи заполняется 6-7 из них, бывает реже и все 16. Что ж ему (юзеру) расстановкой ноликов-то заниматься? Я всегда стараюсь максимально автоматизировать всё, в чем участие пользователя не требуется, пусть шаловливым ручкам будет по-меньше работы :-). А корректность ввода конечно же контролируется. С числовыми полями попроще, они сами не допускают вводить, что попало. Бороться доводится, разве что, с отрицательными числами. Спасибо за помощь! Решение найдено.

Т.е.? Вы, хоть, комментируйте по-подробнее такие заявления. У меня все работает. Ноль не добавляется при вводе значения, и при этом возвращается в качестве дефолтового значения, если ничего не ввести.

Зачем мне цвет? Сам "0" мешался. Клеился к вводимому значению:


чтоб в дальнейшем не маяться с функцией Nz и прочими методами. Значения этих полей участвуют потом в разных запросах в арифметических действиях. Ну и не эстетично это на экране пользователю показывать (на этой же форме): "стоимость того-то - [пустой квадратик]", или "масса нетто [пустой квадратик] кг".

Да чего вы взъелись? всё ж получилось, как надо, без побочных эффектов. Испытания провёл, всё проверил. Тему можно закрыть.