例: IsCategory property (NotesViewColumn - LotusScript®)

次のエージェントは denmark.nsf データベースの [By Category] ビューの第 1 列がカテゴリ別に設定されているか調べます。

Sub Initialize
  Dim db As New NotesDatabase( "", "denmark.nsf" )
  Dim view As NotesView
  Dim column As NotesViewColumn
  Set view = db.GetView( "By Category" )
  Set column = view.Columns( 0 )
  If column.IsCategory Then
    Messagebox( "First column is categorized." )
  Else
    Messagebox( "First column isn't categorized." )
  End If
End Sub