LOTUSSCRIPT /COM/OLE のクラス

例: CurrencySymbol プロパティ
次の例は、通貨の国別設定値を表示します。表示する設定値は、通貨記号、通貨記号と数値の間にスペースを入れるかどうか、通貨記号を数値の後に付けるかどうか、です。

Dim session As New NotesSession
Dim international As NotesInternational
Set international = session.International
Messagebox international.CurrencySymbol,, "Currency symbol"
If international.IsCurrencySpace Then
 Messagebox "Yes",, _
 "Space between currency symbol and number?"
Else
 Messagebox "No",, _
 "Space between currency symbol and number?"
End If
If international.IsCurrencySuffix Then
 Messagebox "Yes",, "Currency symbol follows number?"
Else
 Messagebox "No",, "Currency symbol follows number?"
End If

関連項目