LCNumeric の New メソッド

新しい LCNumeric クラスオブジェクト用のコンストラクタメソッドです。

定義位置

LCNumeric

構文

Dim variableName As New LCNumeric(lprecision, scale)

パラメータ

パラメータ	説明
precision	Long。オプション。このオブジェクトの精度です (0 から 88)。デフォルトは LCMAX_NUMERIC_PREC (88) です。この値が、オブジェクトに格納できる 10 進数字の総数となります。
scale	Long。オプション。このオブジェクトのスケールです (-127 から +127)。両方の引数を省略した場合のデフォルトは LCMAX_NUMERIC_PREC / 2 (44) です。精度を指定した場合のデフォルトのスケールは 0 です。この値により、最後の桁を基準とした小数点の位置が決定します。0 は、整数値を示します。1 は、小数点の右に 1 桁ある値を示します。-1 は、格納される最後の数字の 1 桁右の位置に小数点がある値を示します (10 の倍数の整数)。スケールは、精度にかかわらず -127 ～ 127 の範囲で指定できます。

説明

precision

Long。オプション。このオブジェクトの精度です (0 から 88)。デフォルトは LCMAX_NUMERIC_PREC (88) です。この値が、オブジェクトに格納できる 10 進数字の総数となります。

scale

Long。オプション。このオブジェクトのスケールです (-127 から +127)。両方の引数を省略した場合のデフォルトは LCMAX_NUMERIC_PREC / 2 (44) です。精度を指定した場合のデフォルトのスケールは 0 です。

この値により、最後の桁を基準とした小数点の位置が決定します。0 は、整数値を示します。1 は、小数点の右に 1 桁ある値を示します。-1 は、格納される最後の数字の 1 桁右の位置に小数点がある値を示します (10 の倍数の整数)。

スケールは、精度にかかわらず -127 ～ 127 の範囲で指定できます。

例

Option Public
Uselsx "*lsxlc" 
Sub Initialize
	Dim hundreds As New LCNumeric(8, -2)
	Dim tens As New LCNumeric(8, -1)
	Dim ints As New LCNnumeric(8, 0)
	Dim defaultNum As New LCNumeric
	hundreds.Value = 4567.89
	tens.Value = 4567.89
	ints.Value = 4567.89
	defaultNum.Value = 4567.89
	Print "hundreds=" & hundreds.Text & ", tens=" & tens.Text & ", ints=" & ints.Text & ", defaultNum=" & defaultNum.Text
End Sub

出力例

hundreds=4500, tens=4560, ints=4567, defaultNum=4567.89