Форум программистов, компьютерный форум, киберфорум
Наши страницы
MS Access
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Soft17
1 / 1 / 1
Регистрация: 15.01.2017
Сообщений: 383
1

При обработке ошибки получаем "Ошибка 0"

31.01.2019, 22:07. Просмотров 912. Ответов 1

При выполнении любых манипуляций в поле "ИмяЗадачиЗаплн" появляется окно с сообщением "Ошибка 0".


Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub ИмяЗадачиЗаплн_KeyDown(KeyCode As Integer, Shift As Integer)
     If KeyCode = 13 Then  ' Нажатие `Ввод`
         Dim f
     On Error GoTo errend
        f = Screen.ActiveControl.Name ' Находим имя активного поля поиска
        DoCmd.CancelEvent '
    
    End If ' KeyCode
errend:
          MsgBox "Ошибка " & Err.Number & " " & Err.Description
   
End Sub
Вопрос.
1. Как сделать чтобы обработка ошибок происходила "нормально"?
Т.е. только когда ошибка есть.
0
Миниатюры
При обработке ошибки получаем "Ошибка 0"  
Вложения
Тип файла: zip Ошибка_0.zip (27.6 Кб, 0 просмотров)
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.01.2019, 22:07
Ответы с готовыми решениями:

При создании нового файла "*.mdb" возникает "ошибка связи с сервером OLE"
При создании нового файла "*.mdb" "ошибка связи с сервером OLE". Выскакивают окна Окно 1...

Окно ошибки, при нажатии кнопки "отмена"
Здравствуйте! Столкнулся с проблемой: в форме есть некое количество кнопок, которые привязаны к...

Ошибки при проектировании БД "Вузы"
Помогите....Я в этом деле новичок.Трудно все это понимается.Сижу пытаюсь создать бд - ВУЗы.т.е...

вывести записи из таблицы "Таблица1", в которых есть название1, но при этом столбец "Код" из таблицы "Таблица1" присутствует в значениях столбца "Комм
Помогите пожалуйста, решить такую задачку. Необходимо вывести записи из таблицы "Таблица1", в...

Message "Write conflict" with "Save record", "Copy to clipboard", "Drop changes" buttons
Здравствуйте. Получив это сообщение нажимаю на "Save record" и продолжаю работать. Скажите,...

1
Capi
Модератор
Эксперт MS Access
2021 / 1104 / 254
Регистрация: 12.06.2016
Сообщений: 2,632
31.01.2019, 22:12 2
Лучший ответ Сообщение было отмечено Soft17 как решение

Решение

Soft17,

После End If поставьте Exit Sub.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.01.2019, 22:12

Запрос "alter table Таблица1 add column ". Ошибка: "Слишком большая длина записи"
При выполнении запроса выпадает ошибка "Слишком большая длина записи" Private Sub...

При нажатии на кнопку "Сохранить запись" в текстовом поле вылезает надпись "#Удалено"
При нажатии на кнопку "Сохранить запись" в текстовом поле вылезает надпись "#Удалено", как это...

Ошибка "Method or data member not found" в "FormatConditions"
Код создаёт правила условного форматирования: Option Compare Database Private Sub...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru