フィールドAの値が変化したとき、B-1とB-2の値をクリアするのでしたら、フィールドAの OnChange で次のように記述してはいかがでしょうか? Dim ws As New NotesUIWorkspace Call ws.CurrentDocument.FieldClear("B-1") Call ws.CurrentDocument.FieldClear("B-2") また、フィールドAのプロパティにある「キーワードの変更時にフィールドを更新」にチェックを付けます。