例: ItemName property (NotesViewColumn - LotusScript®)

次のスクリプトは、データベース YAHOO.NSF で [カテゴリ別] ビューの第 1 列のプログラム名を取得します。例えば、第 1 列に [カテゴリ] フィールドの値が表示されており、ビューの設計者がプログラム名を変更していない場合、ItemName プロパティは「Categories」を返します。
```
Sub Initialize
  Dim db As New NotesDatabase( "", "yahoo.nsf" )
  Dim view As NotesView
  Dim column As NotesViewColumn
  Dim item As String
  Set view = db.GetView( "By Category" )
  Set column = view.Columns( 0 )
  item = column.ItemName
End Sub
```
次のスクリプトは、データベース YAHOO.NSF で [カテゴリ別] ビューの第 2 列のプログラム名を取得します。例えば、第 2 列にシンプルファンクションまたは式の値が表示されており、ビューの設計者がプログラム名を変更していない場合、ItemName プロパティは「$1」を返します。ビューの設計者が名前を「Column 2」に変更すると、「Column 2」が返されます。
```
Sub Initialize
  Dim db As New NotesDatabase( "", "yahoo.nsf" )
  Dim view As NotesView
  Dim column As NotesViewColumn
  Dim item As String
  Set view = db.GetView( "By Category" )
  Set column = view.Columns( 1 )
  item = column.ItemName
End Sub
```