次のエージェントは、数値列での数値のパーセンテージ表示の設定を切り替えます。
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim vc As NotesViewColumn
Dim f As String
Set db = session.CurrentDatabase
Set view = db.GetView("View A")
Set vc = view.Columns(1)
vc.IsNumberAttribPercent = NOT vc.IsNumberAttribPercent
End Sub