У меня есть некоторые vba в событии On Open формы, однако, когда форма открыта, элементы управления заблокированы или заморожены.Элементы управления, такие как кнопки, хороши, но выпадающие, текстовые и т. Д. «Застряли».Я могу нажать на них, но фокус и курсор не перемещаются в элемент управления.Попытка открыть раскрывающийся список не задействует элемент управления и т. Д.
Я сузил его до настройки VBA текст / значение текстового поля.Если я прокомментирую строки для изменения значения, форма будет работать так, как задумано, кроме этой функции.Обратите внимание, что этот же код VBA работает без проблем в другой форме.
Вот код в настоящее время:
Dim OtherMax As Long
Dim MaterialsMax As Long
OtherMax = DMax("[PO Num]", "[All POs]")
MaterialsMax = DMax("[PO NUMBER]", "[MATERIAL PO DATASHEET]")
DoCmd.GoToRecord , , acNewRec
If IsNull(Me.PONum) Then
If MaterialsMax >= OtherMax Then
Me.PONum = MaterialsMax + 1
Else
Me.PONum = OtherMax + 1
End If
End If
Что я делаю неправильно, чтобы блокировать элементы управления?
Заранее спасибо, Майк