Lotus Domino Designer 8.5 ヘルプ - 例:NumberAttrib プロパティ

LOTUSSCRIPT /COM/OLE のクラス

例:NumberAttrib プロパティ
1. 次のエージェントは、列の数値属性を表示します。

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.NumberAttrib And VC_ATTR_PARENS) = _ VC_ATTR_PARENS Then msg1$ = "Parentheses on negative numbers" Else msg1$ = "No parentheses on negative numbers" End If If (vc.NumberAttrib And VC_ATTR_PUNCTUATED) = _ VC_ATTR_PUNCTUATED Then msg2$ = "Punctuated at thousands" Else msg2$ = "Not punctuated at thousands" End If If (vc.NumberAttrib And VC_ATTR_PERCENT) = _ VC_ATTR_PERCENT Then msg3$ = "Percentage" Else msg3$ = "Not a percentage" End If Messagebox msg1$ & Chr(13) & msg2$ & Chr(13) & msg3$,, _ "Number attributes" End Sub

2. 次のエージェントは、列に負数のカッコおよび千の位のカンマを設定し、パーセンテージとして表示しないように設定します。

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.NumberAttrib = VC_ATTR_PARENS + VC_ATTR_PUNCTUATED End Sub

3. 次のエージェントは、すでに設定されている他の属性を変更せずに、列をパーセンテージとして表示するように設定します。

4. 他の属性に影響を与えずに数値属性を 1 つ設定するには、次の形式の論理構成を使用します。

vc.NumberAttrib = _ vc.NumberAttrib Or VC_ATTR_PARENS

他の属性に影響を与えずに数値属性を 2 つ設定するには、次の形式の論理構成を使用します。

vc.NumberAttrib = _ vc.NumberAttrib Or VC_ATTR_PARENS Or VC_ATTR_PUNCTUATED

他の属性に影響を与えずに 1 つの数値属性の設定を解除するには、次の形式の論理構成を使用します。

vc.NumberAttrib = _ vc.NumberAttrib And (Not VC_ATTR_PARENS)

他の属性に影響を与えずに 2 つの数値属性の設定を解除するには、次の形式の論理構成を使用します。

vc.NumberAttrib = _ vc.NumberAttrib And (Not (VC_ATTR_PARENS Or VC_ATTR_PUNCTUATED))

関連項目

NumberAttrib プロパティ

用語集

フィードバック ヘルプ または プロダクトユーザビリティ

ヘルプの使い方

すべてのヘルプ項目

用語集