HasPassword Property Example

This example sets the password "kittycat" for the active document and then displays a confirmation message.

ActiveDocument.Password = "kittycat"
If ActiveDocument.HasPassword = True Then _
    MsgBox "The password is set."