ник: zhebov_andrey
Как то Вы показали мне вот это...
Private Sub Умер_AfterUpdate()
If Me!Умер = True Then
Me![Дата смерти].Locked = False
Me![Дата смерти].BackColor = 16777215
Else
Me![Дата смерти] = ""
Me![Дата смерти].Locked = True
Me![Дата смерти].BackColor = -2147483633
End If
End Sub
В данном случае используется флажок...
Теперь я хочу сделать тоже самое для двух полей со списками, т е при выборе в поле "случаи обращения" - "травмы" поле со списком "Вид травмы" становилось бы активным и наоборот...
Делаю вот так...
Private Sub ПолеСоСписком107_AfterUpdate()
If Me![Случаи обращения] = "Травмы" Then
Me![Вид травмы].Locked = False
Me![Вид травмы].BackColor = 16777215
Else
Me![Вид травмы] = ""
Me![Вид травмы].Locked = True
Me![Вид травмы].BackColor = -2147483633
End If
End Sub
А он ругается и указывает на...
Me![Вид травмы].Locked = True
Что я делаю не так???