Sub Initialize
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim view As NotesView
 Set db = session.CurrentDatabase
 Set view = db.GetView("By Category")
 REM Set 2 aliases:ByCat and BC
 Call view.SetAliases("ByCat|BC")
End Sub

関連項目

SetAliases メソッド

用語集