例: ClearProperty method

次の例は、ClearProperty メソッドを使用して NotesProperty の値を消去します。


 
Dim s As New NotesSession
Dim pb As NotesPropertyBroker
Set pb = s.GetPropertyBroker()
dim PropName as string
PropName = "Subject"
Call pb.setPropertyValue(PropName,"My Subject")
Print "Property set to value " & pb.getPropertyValue(PropName)(0) 
'value of "My Subject" will be printed
Call pb.ClearProperty(PropName)
Print "Property set to value " & pb.getPropertyValue(PropName)(0)
'value of blank will be printed