Введенное значение не подходит для данного поля

@Арт_ · Регистрация: 24.05.2017

Студворк — интернет-сервис помощи студентам

Всем привет!

На главной форме создал свободные поля, которым присвоил значение полей подчиненной формы.
При открытии глав формы выдается ошибка "Введенное значение не подходит для данного поля". Нажимаю Debug, перехожу на проблемную строку, ей присваивается Null.
Присвоение сделал через режим - программы в событии, изначально было через режим - выражение и выдавало #ошибку.

Ошибка "Введенное значение не подходит для данного поля" вылетает, когда в базе нет записей, хотя иногда при переходе в конструктор или между формами тоже выскакивало.

СкАжите, что надо в бд добавить записи и на этом успокоится, но не...
Решил, что нужно сделать проверку на наличие значений (не знаю как правильно, на пустоту или инициализацию) в свободных полях.
Пробовал на null, empty, nothing.

Не в курсе возможно эта ошибка норма для данной ситуации. И это только можно обработать обработчиком ошибок или событием error.
Хочу разобраться,

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

Добавлено через 4 минуты

Visual Basic
1
2
3
4
5
Private Sub Form_Current()
        
        Me.[Поле2] = Me.[PF_DOKUMENT]![Номер]
        Me.[Поле4] = Me.[PF_DOKUMENT]![Дата]
        Me.[Поле6] = Me.[PF_DOKUMENT]![Владелец]

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Private Sub Кнопка11_Click()
    On Error GoTo Err_Кнопка11_Click
 
        Dim stDocName As String
        Dim stLinkCriteria As String
        
        stDocName = "DOKUMENT"
        
        If Me.[Поле2] Is Not Null Then      'проверка на инициализацию Me.[Поле2]
                                        'если она существует открывается форма
            stLinkCriteria = "[NOMER]=" & "'" & Me![Поле2] & "'"
            DoCmd.OpenForm stDocName, , , stLinkCriteria
            
        Else   'иначе выдается ошибка
        
            Dim alert, msg, style, title As String
            
            msg = "Ни одной записи нет в базе данных! Нажмите кнопку " & Chr(171) & "Новая карточка " & Chr(187) & " для того, чтобы создать новую запись."
            style = vbOKOnly + vbExclamation
            title = "Сообщение об ошибке"
        
            alert = MsgBox(msg, style, title)
            
        End If
    
Exit_Кнопка11_Click:
Exit Sub
 
Err_Кнопка11_Click:
    MsgBox Err.Description
    Resume Exit_Кнопка11_Click
    
End Sub

как-то так

mobile · 02.06.2019, 10:42

Сообщение от Арт_

это разве не поле формы, которая будет открыта по нажатию кнопки?

Да, перепутал, недосмотрел. Конечно в открываемой форме есть такое поле. Но! Его нет в источнике этой формы. А фильтр работает по табличным (или запроса) источникам форм. Поэтому выражение фильтра надо исправить на

Visual Basic
1
stLinkCriteria = "[РегистрационныйНомер]=" & "'" & Me![Поле2] & "'"

@Арт_ · 03.06.2019, 00:03 **[ТС]**

я уже разобрался, но все равно спасибо!

Новые блоги и статьи Все статьи Все блоги /
мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))	Как у меня протекала болезнь zorxor 27.08.2026 Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .	Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему kumehtar 26.08.2026 ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .	[EasyBuilder Pro] Памятка по разработке для панелей Weintek ФедосеевПавел 26.08.2026 Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .
Модель по догадкам anaschu 25.08.2026 Прошло две недели. Я уже рассказывал, как разговаривал с сотрудниками у сортировки и как понял, что главная ветка — не про приёмку, а про отбор. Но тогда я думал, что понял механику. На этой неделе я. . .	Запись в регистр сведений независимо от заполненности табличной части Maks 25.08.2026 Реализация из решения ниже выполнена на нетиповом документе с несколькими табличными частями, разработанного в КА2. Задача: Обеспечить запись документа в регистр сведений независимо от. . .	Ноутбук Альфария kumehtar 24.08.2026 Встретился тут в сети ноутбук Альфария, примарха Альфа-Легиона. Хотя возможно, это ноутбук Омегона, разумеется. Ну как вам?	Мастера простых решений DevAlt 23.08.2026 В сишарп стэках winforms, да и wpf существует сложная система связывания источниках данных и элементов формы(текстовые поля и метки), опирается все это на технологию событий и мета. . .

@Арт_ 1 / 1 / 0 Регистрация: 24.05.2017 Сообщений: 270
	03.06.2019, 00:03 [ТС]
	я уже разобрался, но все равно спасибо! 0