LOTUSSCRIPT /COM/OLE のクラス

例:NumberFormat プロパティ
次のエージェントは、数値列の形式を切り替えます。

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)
 If vc.NumberFormat = VC_FMT_GENERAL Then
   vc.NumberFormat = VC_FMT_FIXED
   f = "Fixed"
 Elseif vc.NumberFormat = VC_FMT_FIXED Then
   vc.NumberFormat = VC_FMT_CURRENCY
   f = "Currency"
 Elseif vc.NumberFormat = VC_FMT_CURRENCY Then
   vc.NumberFormat = VC_FMT_SCIENTIFIC
   f = "Scientific"
 Else
  vc.NumberFormat = VC_FMT_GENERAL
   f = "General"
 End If
Messagebox f,, "New number format"
End Sub

関連項目