Something like this ...
Private _WorkbookLocked As Boolean
Public Property WorkbookLocked() As Boolean
Set(ByVal value As Boolean)
_WorkbookLocked = value
I haven't put in all the code that you had
Easiest way to do this (depending on which version of VS you have) is to type
and then hit the tab key. A code snippet will be generated with fields for you to fill in (Name, Type)