VBScript には、配列をフィルタリングして元の配列のサブセット配列を返すために使用できる Filter 関数があります。構文の説明:
フィルター機能
指定されたフィルター条件に基づいて、文字列配列のサブセットを含む 0 から始まる配列を返します。
Filter(InputStrings, Value[, Include[, Compare]])
パラメータ
入力文字列
必須。文字列を検索するための 1 次元配列。
価値
必須。検索する文字列。
含む
オプション。返された部分文字列に値が含まれるかどうかを指定するブール値。 Include が True の場合、Filter は部分文字列 Value を含む配列のサブセットを返します。 Include が False の場合、Filter は部分文字列 Value を含まない配列のサブセットを返します。
比較する
オプション。使用される比較文字列のタイプを示す数値。「値の設定」セクションを参照してください。
設定
Compare パラメータには次の値を指定できます。
絶え間ない
価値
説明する
vbBinaryCompare
0
バイナリ比較を実行します。
vbTextCompare
1
テキスト比較を実行します。
説明する
InputStrings に一致する値が見つからない場合、Filter は空の配列を返します。 InputStrings が Null であるか、1 次元配列ではない場合、エラーが発生します。
Filter 関数によって返される配列には、一致の数を含むのに十分な要素のみが含まれています。
次の例では、Filter 関数を使用して、検索条件 Mon を含む配列を返します。
次のようにコードをコピーします。
ディムマイインデックス
ディムマイアレイ (3)
MyArray(0) = 日曜日
MyArray(1) = 月曜日
MyArray(2) = 火曜日
MyIndex = Filter(MyArray, Mon) 'MyIndex(0) には月曜日が含まれます。
赤い位置に注意する必要があります。MyIndex は配列です。 ～
次のようにコードをコピーします。
ディム MyIndex,IndexItem
DimMyArray(2)
MyArray(0) = 日曜日
MyArray(1) = 月曜日
MyArray(2) = 月曜日
MyIndex = Filter(MyArray, Tuesday)
IndexItem = 0 の場合、UBound(MyIndex) へ
Response.Write MyIndex(月曜日)&<br />
次