Sub Initialize
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim view As NotesView
 Dim column As notesViewColumn
 Set db = session.CurrentDatabase
 Set view = db.Getview("Align")
 Set column = view.Columns(0)
 Messagebox (column.IsIcon)
End Sub

See Also

IsIcon property

Glossary