'WriteOnly' property must provide a 'Set'
If a property is declared as WriteOnly, it must supply a procedure for writing its value.
Error ID: BC30125
To correct this error
Make sure you include a Set procedure between the Property statement and the End Property statement.
Verify that other procedures within the Property declaration are correctly terminated.