Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
М3. Создание форм для ввода, редактирования и п...doc
Скачиваний:
8
Добавлен:
12.08.2019
Размер:
3.34 Mб
Скачать

3.2. Действие 2. Ищем запись, которую нужно удалить (выбранную пользователем в подчиненной форме).

MyTable.FindFirst("ИмяКлючПоля = "+ CStr(ИмяПодчиненнойФормы.Controls("ИмяКлючПоля").Value)

MyTable – имя переменной, которая была использована для открытия таблицы-посредника

FindFirst – метод, позволяющий найти первую запись в таблице, удовлетворяющую условию в скобках

ИмяКлючПоля – имя ключевого поля таблицы посредника

ИмяПодчиненнойФормы - имя подчиненной формы, которое Вы ей дали

Controls – обращение к элементам управления подчиненной формы

Controls("ИмяКлючПоля") - обращение к элементу управления подчиненной формы с именем "ИмяКлючПоля"

Controls("ИмяКлючПоля").Value – значение, записанное в элементе управления подчиненной формы с именем "ИмяКлючПоля"

CStr – функция, преобразующая данные числового (или другого) типа в данные текстового типа

3.3. Действие 3. Удаляем найденную запись.

MyTable.Delete

MyTable – имя переменной, которая была использована для открытия таблицы-посредника

Delete – метод удаления текущей записи

3.4. Действие 4: Отображаем внесенные изменения в подчиненной форме.

ИмяПодчиненнойФормы.Requery

ИмяПодчиненнойФормы – имя подчиненной формы, которое Вы ей дали

Requery – метод обновления содержимого подчиненной формы

4. Перейдите в режим формы и проверьте работоспособность созданной процедуры.

ВНИМАНИЕ: Созданная нами процедура не содержит защиты от неправильных действий, поэтому не нажимайте на кнопку «Удалить», если ни одна из записей подчиненной формы не выбрана.