Модераторы: Akina
  

Поиск:

Закрытая темаСоздание новой темы Создание опроса
> Ввод серии и № паспорта в Б/Д 
V
    Опции темы
Flotskiy
Дата 30.1.2006, 14:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2



Добрый день всем!
Суть такова: на форме вносится информация об абитуриентах. Для внесения серии и № паспорта: нового образца (00 00 000000) - в MaskEdBox1,
старого образца, где есть буквы или паспорта из СНГ вносятся в TextBox1.
При просмотре
Код

Text1.Visible=False
MaskEdBox1.Visible=True


Нельзя ли написать код как-нибудь так:
Код

Private Data1_Reposition()
If "№паспорта" имеет кроме цифр и буквы Then
TextBox1.Visible=True
MaskEdBox1.Visible=False
End If
End Sub

Б/Д - Access
Подскажите, pse.
С уважением




--------------------
FlotskiySk k
PM MAIL   Вверх
Akina
Дата 30.1.2006, 14:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Сделай наоборот. Один текстбокс под серию и другой под номер.

С номером все ясно - только цифры. А с серией - проверяешь что там введено. Если только цифры - новый паспорт, если цифры и буквы, причем валидно для старых серий - старый паспорт, иначе обматерить оператора.

Т.е. проверяй после ввода, а не ограничивай до.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
kulibin
Дата 30.1.2006, 22:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 229
Регистрация: 9.5.2005
Где: Украина, Запорожь е

Репутация: 2
Всего: 3



или можно свой слепить маскедэдит smile
textbox_keypres, selstart,sellength, left,mid,right smile + if isnumeric(text1) smile
PM MAIL WWW ICQ   Вверх
Flotskiy
Дата 31.1.2006, 07:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2



Добрый день всем! kulibin, если короче выразиться про данный данный вопрос то так:
в Б/Д есть поле "№паспорта". Данные выходят на форме в TextBox и MaskEdBox.
Если данные имеют такой формат "00 00 000000" то надо спрятать TextBox , а если нет то спрятать MaskEdBox
С уважением.

--------------------
FlotskiySk k
PM MAIL   Вверх
Akina
Дата 31.1.2006, 09:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Flotskiy
С одной стороны, прятать надо до ввода - чтобы вводилось куда надо.
С другой стороны решить, куда вводить, можно только после ввода.

Подумай...


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Flotskiy
Дата 31.1.2006, 10:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2



Akina
При вводе информации открыт MaskEdBox, т.к. почти все паспорта идут нового образца,
а TextBox скрыт. Если будет паспорт ст. образца, то нажимаем на Label. Cartion="Старый паспорт"
и закрывается MaskEdBox, а открывается TextBox . Здесь все нормально, вопросов нет.
А при просмотре записей если у кого запись старого образца, то она не отображается в MaskEdBox, а отображается в TextBox,е. В данном случае надо скрыть MaskEdBox.
Вот, (надоел уж всем со своим вопросом)
Всего доброго

--------------------
FlotskiySk k
PM MAIL   Вверх
Akina
Дата 31.1.2006, 11:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



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


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Flotskiy
Дата 31.1.2006, 11:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2



Akina, Спасибо. Простой выход.
Не зря говорят: "Одна голова хорошо..."
С уважением
--------------------
FlotskiySk k
PM MAIL   Вверх
Akina
Дата 31.1.2006, 11:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



smile
Цитата(Flotskiy @ 31.1.2006, 12:19 Найти цитируемый пост)

Не зря говорят: "Одна голова хорошо..."
Ну да... "Две головы хорошо, а одна - красивее..." smile



--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
  
Закрытая темаСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0599 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.