маска ввода есть в VB6?

[АндрейБ]

Скажите, можно установить маску ввода для элемента TEXT в форме VB (на в формах акцессах)?
Например что бы вводилась дата, телефон, индекс по определенной маске маске?

[Хакер]

Есть такой контрол.

[ger_kar]

Так форма VB или Access? И контролы соответсвенно тоже? Может у тебя там слово как пропущено?
Если делать все в Access, то там у TextBox'a есть соответствующее свойство.

[АндрейБ]

пишу машинально, поэтому иногда страдает написание мыслей.
Естественно в VB6 (просто до этого я разрабатывал приложения в Акцессе и там в формах элемент TEXT имел маску ввода
- это очень помогало для стандартизации записей).
Такое есть в VB6?

[Antonariy]

Да есть же, есть.

Неужели так сложно потратить минут 15 и посмотреть, какие контролы вообще есть в системе? Их же не так много как библиотек. Или вам вообще не интересно?

Кто ищет, тот всегда найдет ...

А кто-то вообще не ищет.

[АндрейБ]

Отличный ответ Antonariy.
Я спросил конкретно по контролу TEXT. На форуме я не нашел ничего применимого к VB6.
Если сложно ответить, то я сам отвечу всем начинающим - друзья надо добавить компонент MaskEdBox к вашему проекту.
Этот контрол позволяет вводит данные по маске.

[Antonariy]

Я спросил конкретно по контролу TEXT.

Во-первых, не контролу, а "элементу", во-вторых, нет такого контрола, есть TextBox. Вот и угадывай, что там конкретика, а что фантазия.

[Samovar]

А как настроить MaskEdBox чтобы вводить стоимость?

Скажем ####.##

Чтобы можно было вводить 0.01; 3.14; 5.1; 1234.56...
Напр. чтобы после ввода 3 и нажатия точьки сразу можно было бы вводить 14.
И чтобы MaskEdBox допускал вводить знак "-" перед числом.
И не допукал ввода других символов, напр. букв.

Что для этого нужно прописать в свойстве "Mask"?

[АндрейБ]

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

[Qwertiy]

При первом нажатие значаение может быть либо цифра либо -. Если вводиться либой другой символ его удалять и обнулять значение поля.
После первого символа идет ввод только цифр либо разделителя, который вы примете для себя (,.). в противном если введено что-то иное, подставляем поле до ввода последнего символа.
После ввода разделителя принимает только цифры, иначе подставляем поле до ввода последнего символа.

Так нельзя. Во-первых, существует вставка из буфера, которая таким кодом не проверяется. А во-вторых, кто сказал, что символы будут вводиться подряд? Например, нажму 5, потом стрелку влево и минус. Нельзя? А ещё лучше, напишу 1234567, потом щелчком мыши перемещю курсор и продолжу писать.
Если уж есть желание устроить подобную проверку, то надо просматривать содержимое и как-то реагировать на некорректные данные. Лучше какой-нибудь меткой (только не MsgBox или что-то в этом духе! просто текст или фон), т. к. я могу написать 123.456, и попытаться исправить на 1234.56 сначала написав вторую точку, а потом убрав первую.

Чтобы можно было вводить 0.01; 3.14; 5.1; 1234.56...Напр. чтобы после ввода 3 и нажатия точьки сразу можно было бы вводить 14.И чтобы MaskEdBox допускал вводить знак "-" перед числом.

Я что-то не понял... Есть ограниченный набор чисел? Или ты хочешь реализовать автодополнение?

По поводу автодополнения. Лично я для таких целей предпочитаю выпадающий список. При выполнении команды в него помещается введённое значение, которое потом можно выбрать. Делал так в программах, где возникает небольшое количество частоиспользуемых значений и их удобно выбирать мышью. При желании можно сделать и автодополнение, только в таком случае надо следить за положением курсора - он должен стоять в последней позиции, если это не так, то уничтожение текста после курсора может навредить, а перемещение его в конец просто неестественно и неудобно.

[Samovar]

Да нет - как раз то, что Вы разписали в первом абзаце. Только если делать так, для чего вообще MEB? Тогда уж через TextBox и в случае LostFocus форматировать введеное.

[Qwertiy]

Да нет - как раз то, что Вы разписали в первом абзаце. Только если делать так, для чего вообще MEB? Тогда уж через TextBox и в случае LostFocus форматировать введеное.

Про обычный TextBox согласен. А вот про LostFocus - а зачем? На мой взгляд, лучше либо на TextChanged (например, поменять фон с белого на розовый), либо на нажатие OK (тут уже MsgBox).

Кстати, интересный вопрос... А можно ли как-то перейти на другой элемент так, что LostFocus не произойдёт? Например с парой MouseDown & MouseUp можно между ними нажать Alt+Tab

[Samovar]

Про LostFocus я имел ввиду чтобы отформатировать результат, наподобии того что делает свойство "Format" в MEB.
Напр. разделить порядки интервалом, округлить до второй цифры после десятичной точки, подкрасить в красный если сумма меньше нуля. Если вводим дату, то нужно проверять все цифры и т.д.

Про переключение - это как? Если нажать Alt+Tab управление перейдет к другому приложению. При переключении обратно активируется последнее окно и поледний контроль. Или я что-то упустил?

[Qwertiy]

Про LostFocus я имел ввиду чтобы отформатировать результат, наподобии того что делает свойство "Format" в MEB.
Напр. разделить порядки интервалом, округлить до второй цифры после десятичной точки, подкрасить в красный если сумма меньше нуля. Если вводим дату, то нужно проверять все цифры и т.д.

Я бы проверки поставил на TextChanged. А форматирование действительно логичнее на LostFocus.

Про переключение - это как? Если нажать Alt+Tab управление перейдет к другому приложению. При переключении обратно активируется последнее окно и поледний контроль. Или я что-то упустил?

Alt+Tab относилось к событиям мыши. Если нажать кнопку мыши, удеживая её нажать Alt+Tab, после чего отпустить, то событие MouseUp не возникнет Вот и стало интересно, можно ли каким-нибудь хитрым способом (возможно, программным) обойти LostFocus