New サブルーチンが定義されているクラスのオブジェクトを作成するときに実行される、ユーザー定義のサブルーチンです。

構文Sub New [ ( [ argList ] ) ] [ , baseClass ( [ baseArgList ] ) ]
[ statements ]

End Sub

構成要素argList

省略可能。New サブルーチンのパラメータ宣言をカッコで囲み、カンマで区切ったリストです。パラメータ宣言には次の構文を使います。

[ ByVal ] paramName [ ( ) | List ] [ As dataType ]


ByVal は、paramName が値で渡されることを意味します。つまり、paramName に代入される値は、元の値への参照ではなく、サブルーチンの呼び出しで指定された値のコピーです。

paramName() は配列変数です。List は paramName をリスト変数として識別します。それ以外の場合、paramName には LotusScript でサポートされるその他すべての型の変数を指定できます。

As dataType は変数のデータ型を指定します。この節を省略し、データ型の接尾辞を使って、変数をスカラーデータ型の 1 つとして宣言できます。この節を省略し、paramName の末尾にデータ型の接尾辞を付けなければ (同時に、既存の Deftype ステートメントで処理されなければ)、データ型は Variant 型となります。


派生クラスの New サブルーチンに引数がなく、ベースクラスの New サブルーチンにも引数がなければ、(argList) と baseClass (baseArgList) を省略します。

省略可能。baseClass は派生クラスの派生元となったクラスの名前です。この名前は、派生クラスの Class ステートメントの baseClass 名と同じでなければなりません。

baseArgList は、ベースクラスのサブルーチン New の引数をカンマで区切ったリストです。これらはパラメータ宣言ではなく実際の引数なので注意してください。この構文では、派生クラスの New サブルーチンを呼び出して、ベースクラスの New サブルーチンの呼び出しに実際の引数を渡せるようにします。

New サブルーチンにこの構文を使うのは、次の条件がすべて満たされる場合に限られます。

• 定義するクラスが派生クラスである場合。
• この派生クラスのベースクラスの New サブルーチンに引数が必要な場合。

これらの引数は、派生クラスの New サブルーチンの呼び出しを通じて、ベースクラスの New サブルーチンに渡さなければなりません。
• ベースクラスの New サブルーチンの引数リストを構成する引数の数とデータが、派生クラスの New サブルーチンの引数リストと異なる場合、または派生クラスの New サブルーチンに渡されるものとは異なる引数をベースクラスの New サブルーチンに渡す必要がある場合。
定義するクラスが派生クラスのときは、その New サブルーチンを呼び出すたびに、ベースクラスの New サブルーチンが呼び出されます。ベースクラス自体が別のベースクラスの派生クラスであれば、さらに別の呼び出しが生成されていきます。

LotusScript ランゲージリファレンス: Q - T
Class ステートメント
Sub ステートメント

用語集