LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Проверка ненуле...
 Проверка ненулевого значения поля
 
 19.03.2008 12:41:07
Nensi
24 сообщения


Проверка ненулевого значения поля

Скажите пожалуйста, каким образом можно осуществить проверку заполения поля на форме при вводе данных, чтобы в случае если одно или несколько полей не были заполнены-пользователь получал сообщение: "Вы не заполнили такое-то поле" и предоставлялась возможность заполнить его?

Заранее спасибо. :)

 20.03.2008 12:37:48
Admin1
731 сообщения
1-ый


Re: Проверка ненулевого значения поля

Пример дан в этом файле: http://shops.leadersoft.ru/Product.aspx?ProductID=8718

' Проверка при выгрузке окна
Private Sub Form_Unload(Cancel As Integer)
    If Nz(Me.Country, "") = "" Then
        Me.Country.Controls(0).ForeColor = RGB(255, 0, 0)
        MsgBox "НЕ заполнено поле Страна!", vbCritical, "Ошибка при вводе данных"
        Cancel = True ' Отменяем закрытие окна
        DoCmd.CancelEvent ' Отменяем последнее событие
        Exit Sub
    End If
    ' Запрашиваем закрытие окна
    If MsgBox("Закрыть окно !", vbInformation + vbOKCancel, "Выход из программы") <> vbOK Then
        Cancel = True
        DoCmd.CancelEvent
    End If
End Sub

  Программирование  Microsoft Access. Файлы mdb и accdb  Проверка ненуле...
ПоискПоиск  Список форумовСписок форумов  
right