Предупреждение ! проверка возраста ребенка на значение

@Vitalii197777 · Регистрация: 28.08.2013

Author24 — интернет-сервис помощи студентам

Уважаемые подскажите пожалуйста как прописать ,если поле.Вид=Реб. а поле.Возраст=18,чтоб выскакивало предупреждение,Измените данные.

Спасибо!

mobile · 23.09.2017, 17:35

На полях Вид и Возраст, в коде событий До обновления (BeforeUpdate) пропишите проверку с сообщением

Visual Basic

If Вид="=Реб." And Возраст>=18 Then
   msgbox "Измените данные."
   Cancel=True
End If

Или сделать аналогичную проверку на событии BeforeUpdate формы. Но тогда предупреждение выскочит только при сохранении записи.

@VinniPuh · 23.09.2017, 17:35

Без примерного примера вы точно не поймёте, - Тело БД в студию.

@Вячеслав Я · 23.09.2017, 17:38

Vitalii197777, попробуйте на событии После обновления прописать

Visual Basic

ПослеПоля_AfterUpdate()
If [Вид] ="Реб" and [Возраст]=18 Then
MsgBox "Измените данные.Спасибо!"
End If

Или покажите Ваш пример.

Уже аппаздал.

@Capi · 23.09.2017, 17:42

Vitalii197777,

Не знаю предметной области Вашей разработки,
но в медицинской статистике "ребенок" - от 0 до 14 включительно,
от 15 до 17 включительно - "подросток", а вместе они - "несовершеннолетние".

@Eugene-LS · 23.09.2017, 21:07

Сообщение от Vitalii197777

Уважаемые подскажите пожалуйста как прописать ,если поле.Вид=Реб. а поле.Возраст=18,чтоб выскакивало предупреждение,Измените данные.

Ну вам потребуется функция расчёта возраста, их в сети навалом на VBA - выбирайте на вкус и скорость.
Дальше - уже обработка по вашим данным.
Возраст на тек дату рассчитывается
- Если наступило уже 18, а признак стоит что ребёнок - задавайте вопрос, или меняйте автоматом
(но следите за системной датой компа при этом)

@Vitalii197777 0 / 0 / 0 Регистрация: 28.08.2013 Сообщений: 202
		1
	Предупреждение ! проверка возраста ребенка на значение 23.09.2017, 17:12. Показов 688. Ответов 5 Метки нет (Все метки) Уважаемые подскажите пожалуйста как прописать ,если поле.Вид=Реб. а поле.Возраст=18,чтоб выскакивало предупреждение,Измените данные. Спасибо! 0

@VinniPuh 9104 / 6023 / 589 Регистрация: 27.03.2013 Сообщений: 19,778
	23.09.2017, 17:35	3
	Без примерного примера вы точно не поймёте, - Тело БД в студию. 1

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,838
	23.09.2017, 17:42	5
	Vitalii197777, Не знаю предметной области Вашей разработки, но в медицинской статистике "ребенок" - от 0 до 14 включительно, от 15 до 17 включительно - "подросток", а вместе они - "несовершеннолетние". 3

@Eugene-LS 10738 / 5579 / 1409 Регистрация: 05.10.2016 Сообщений: 15,769
	23.09.2017, 21:07	6
	Сообщение от Vitalii197777 Уважаемые подскажите пожалуйста как прописать ,если поле.Вид=Реб. а поле.Возраст=18,чтоб выскакивало предупреждение,Измените данные. Ну вам потребуется функция расчёта возраста, их в сети навалом на VBA - выбирайте на вкус и скорость. Дальше - уже обработка по вашим данным. Возраст на тек дату рассчитывается - Если наступило уже 18, а признак стоит что ребёнок - задавайте вопрос, или меняйте автоматом (но следите за системной датой компа при этом) 0