LCCurrency の Copy メソッド

このメソッドは、LCCurrency オブジェクトのコピーを作成します。

定義位置

LCCurrency

構文

Set newCurrency = srcCurrency.Copy

パラメータ

パラメータ	説明
srcCurrency	LCCurrency。コピー元の Currency 値。

戻り値

値	説明
newCurrency	LCCurrency。srcCurrency オブジェクトのコピー。

例

Option Public
Uselsx "*lsxlc"  
Sub Initialize
  Dim num1 As New LCCurrency //For LEI
  Dim num2 As LCCurrency
  num1.Value = 12345.6789
  Set num2 = num1.Copy
  Print "The copy has a value of " & num2.Text
End Sub

出力例

The copy has a value of 12345.6789.