Dim s As New NotesSession
Dim pb As NotesPropertyBroker
Set pb = s.GetPropertyBroker()
Dim pbValue As Variant
Set pbValue = pb.GetPropertyValue("InputPropertyContext")
Messagebox "The value is " + pbValue(0), MB_OK, "GetPropertyValue"

用語集