Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > MS Access > обработчик ошибок для findrecord


Автор: alexIrish 16.2.2007, 13:06
Здраствуйте.
Посветуйте как вписать обработчик ошибок для findrecord. 
Код

...
DN = InputBox("Please scan Delivery Number", "Step1")
DoCmd.FindRecord DN, acEntire, False, acSearchAll, , acCurrent


Если  нет такой записи( номер неправильный или сцанер сломался), тo надо вернуться к сканированию. (или есче куда нибудь).
если через ИФ то как задать условие.

Спасибо

Автор: alexIrish 16.2.2007, 17:25
Kто скажет почему когда я пишу:

If a <> 3 Then MsgBox "nepr"
Else MsgBox "pravda"
End If

То ВБА выдает:
If a <> 3 Then MsgBox "nepr"
Else: MsgBox "pravda"
End If

И пишет ошибку: Else without If

Автор: dionisiu 17.2.2007, 12:01
Двоеточие

Автор: Akina 18.2.2007, 14:34
Цитата(alexIrish @  16.2.2007,  18:25 Найти цитируемый пост)
Kто скажет почему 

Я скажу. Соблюдать синтаксис надо, а не писАть левой пяткой с закрытыми глазами.

Вот ПРАВИЛЬНЫЕ варианты:

Код

If a <> 3 Then MsgBox "nepr" Else MsgBox "pravda"

Код

If a <> 3 Then
 MsgBox "nepr"
Else
 MsgBox "pravda"
End If

Найдите, как говорится, десять отличий.

Автор: alexIrish 19.2.2007, 11:18
Спасибо.
Я за выходные сам нашел. 
Я только начинаю VBA, но уже много вопросов по синтаксису.
Dаже если мастером делать макросы, тo они потом по разному в коде выглядят.
А правила толком нигде нe прописаны. Я, допустим, про IF в форумах нарыл.
В хелпе только блок написан,а что операторы надо с новой строки писать ни слова.

Но вам спасибо.
Акине: Лучшая книга по ВБА на ваш взгляд.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)