LCField の Copy メソッド

このメソッドは、ソースフィールドの設定および値を使用して、フィールドを作成します。新しいフィールドのデータ値の数とデータ型は、ソースフィールドと同じです。新しいフィールドは、元のデータへの参照ではなくコピーです。

定義位置

LCField

構文

Set newField = origField.Copy

パラメータ

パラメータ	説明
origField	LCField。コピーするフィールドオブジェクトです。

戻り値

値	説明
newField	LCField。元のフィールドのコピーです。

使用法

Copy メソッドは、明示的に使用する必要があります。代わりに、次のステートメントを使用することもできます。

Set newField = origField

この場合は、フィールドの値はコピーされず、同じ LCField オブジェクトへの別の「ポインタ」のみが作成されます。newField に格納されている値を変更すると origField の値も変更され、逆の場合も同様です。これは、両者が同じフィールドであるためです。

例

Option Public
Uselsx "*lsxlc"  
Sub Initialize
  Dim field As New LCField (LCTYPE_FLOAT)
  Dim c_field As LCField
  field.value = 12345.123456789
  Set c_field = field.Copy
  Print "The float field is " & field.text(0)
  Print "and its copy is " & c_field.text(0)
End Sub

出力例

The float field is 12345.123456789 and its copy is 12345.123456789.