Examples: ViewInheritedFrom property
This agent displays the inherited name for the current view.
Sub Initialize
Dim ws As New NotesUIWorkspace
Dim uiview As NotesUIView
Set uiview = ws.CurrentView
vif$ = uiview.ViewInheritedFrom
If vif$ = "" Then vif$ = "None"
Messagebox "Inherited from = " & vif$,, uiview.ViewName
End Sub