Есть следующий код для процедуры открытия формы:

Private Sub Поле110_AfterUpdate()
On Error GoTo Err_Поле110_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = ChrW(1056) & ChrW(1072) & ChrW(1089) & ChrW(1087) & ChrW(1086) & ChrW(1088) & ChrW(1103) & ChrW(1078) & ChrW(1077) & ChrW(1085) & ChrW(1080) & ChrW(1077) & ChrW(32) & ChrW(1076) & ChrW(1083) & ChrW(1103) & ChrW(32) & ChrW(1084) & ChrW(1077) & ChrW(1085) & ChrW(1077) & ChrW(1076) & ChrW(1078) & ChrW(1077) & ChrW(1088) & ChrW(1086) & ChrW(1074)

stLinkCriteria = "[Номер_распоряжения]=" & Me![Поле110]
DoCmd.OpenForm stDocName, , , stLinkCriteria


Exit_Поле110_Click:
Exit Sub

Err_Поле110_Click:
MsgBox Err.Description
Resume Exit_Поле110_Click

End Sub


Пожалуйста, помогите откорректировать этот код так, чтобы форма при этом открывалась только в режиме чтения

Буду очень благодарна

Большое спасибо за помощь