Форма подтверждения. - Microsoft Office Access

Ангран · 19.05.2011, 11:03

Доброго времени суток.
Проблема стара как мир, но решение от этого проще не становится. Есть форма1 где пишутся данные для занесения в таблицу1. Посли нажатия на кнопку "Внести" выходит форма2 с выборами ответа "Да" или "Нет". Если нажали кнопку "Да", то данные из формы1 вносятся в таблицу а все строки стираются. Кнопка "нет" просто закрывает форму2.

R Dmitry · 19.05.2011, 15:30

Цитата:

Сообщение от Ангран

Доброго времени суток.
Проблема стара как мир, но решение от этого проще не становится. Есть форма1 где пишутся данные для занесения в таблицу1. Посли нажатия на кнопку "Внести" выходит форма2 с выборами ответа "Да" или "Нет". Если нажали кнопку "Да", то данные из формы1 вносятся в таблицу а все строки стираются. Кнопка "нет" просто закрывает форму2.

зачем форма ?

Код:

Select Case MsgBox ("Так что? не сохранять?", 4, "Что хотите")
Case 6 ' Да
	'вносим в таблицу, очищаем поля
Case 7 ' Нет
	'Закрвываемся
End Select

Ангран · 19.05.2011, 15:55

Всё, проблема решена протым добавлением в код " confirm = MsgBox("", vbYesNo, "Продолжить?")".

19.05.2011, 11:03	#1
Ангран Регистрация: 13.05.2011 Сообщений: 5	Форма подтверждения. Доброго времени суток. Проблема стара как мир, но решение от этого проще не становится. Есть форма1 где пишутся данные для занесения в таблицу1. Посли нажатия на кнопку "Внести" выходит форма2 с выборами ответа "Да" или "Нет". Если нажали кнопку "Да", то данные из формы1 вносятся в таблицу а все строки стираются. Кнопка "нет" просто закрывает форму2.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Подтверждения при выходе из программы	Ayubkhon	Общие вопросы Delphi	18	18.06.2013 00:53
Ответ на клавиши без подтверждения.	Иван=)	Помощь студентам	5	03.11.2010 18:55
визуальное подтверждения на форуме	designer999	Фриланс	1	22.09.2010 11:40
Как в Wiste убрать окошко подтверждения	subbota	Операционные системы общие вопросы	1	26.11.2009 00:18
Окно подтверждения удаления	Andrey174rus	Общие вопросы Delphi	18	17.11.2009 19:52

19.05.2011, 15:55	#3
Ангран Регистрация: 13.05.2011 Сообщений: 5	Всё, проблема решена протым добавлением в код " confirm = MsgBox("", vbYesNo, "Продолжить?")".