Change Property

[orna]

I'd like to change the property "Use Access Special key"
within the code and be able to use F11 without reopen the application.

Set db = CurrentDb
On Error Resume Next
Set prp = db.CreateProperty("AllowByPassKey", dbBoolean, bool_)
db.Properties.Append prp
If Err.Number <> 0 Then
db.Properties("AllowByPassKey") = bool_
End If
db.Properties.Refresh

Is is possible?

TIA