Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Условие / 5 сообщений из 5, страница 1 из 1
02.03.2016, 06:12
    #39183185
noobs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Условие
Добрый день форумчане, подскажите пожалуйста почему не выполняется условие?
Код: vbnet
1.
2.
3.
If rs.Fields(0).Value = Null Then
  MsgBox "Загрузка невозможна. Пустое поле код куратора"
  End If


Когда доходит до if и value=null то просто перескакивает на end.
...
Рейтинг: 0 / 0
02.03.2016, 06:47
    #39183188
\\\\
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Условие
noobs, потому, что один Null не равняется другому Null. Проверять нужно
Код: vbnet
1.
2.
3.
If IsNull(rs.Fields(0).Value) Then
  MsgBox "Загрузка невозможна. Пустое поле код куратора"
  End If
...
Рейтинг: 0 / 0
02.03.2016, 06:57
    #39183191
noobs
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Условие
Вот это да, не знал что Null может быть таким разным)
...
Рейтинг: 0 / 0
02.03.2016, 09:16
    #39183249
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Условие
noobsне знал что Null может быть таким разным
Запомни. Null - это значение "фиг знает". Равен ли один "фиг знает" другому "фиг знает"? а вот "фиг знает"... Равен ли "фиг знает" некоему заданному значению? а вот тоже "фиг знает"... сравнение любого значения с Null - даёт Null. Который интерпретируется как False.
Исключение - Null-safe compare. Но у Jet SQL и у VBA такого сравнения тупо нет.
...
Рейтинг: 0 / 0
02.03.2016, 10:34
    #39183336
Charles Weyland
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Условие
Там, как я помню, есть ещё словечко такое "is"

if a is Null then ....
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Условие / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]