VBS教程:函数-Filter 函数
发布时间:2016-12-28 来源:查字典编辑
摘要:Filter函数返回下标从零开始的数组,其中包含以特定过滤条件为基础的字符串数组的子集。Filter(InputStrings,Value[...
Filter 函数
返回下标从零开始的 数组,其中包含以特定过滤条件为基础的字符串数组的子集。
Filter(InputStrings, Value[, Include[, Compare]]
)
参数
InputStrings
必选项。一维数组,要在其中搜索字符串。
Value
必选项。要搜索的字符串。
Include
可选项。Boolean 值,指定返回的子字符串是否包含
Value。如果
Include 为
True,
Filter 将返回包含子字符串
Value 的数组子集。如果
Include 为
False,
Filter 将返回不包含子字符串
Value 的数组子集。
Compare
可选项。数字值指出使用的比较字符串 类型.请参阅值设置部分.
设置
Compare 参数可以有以下值:
vbBinaryCompare | 0 | 执行二进制比较。 |
vbTextCompare | 1 | 执行文本比较。 |
说明
如果在
InputStrings 中没有找到与
Value 匹配的值,
Filter 将返回空数组。如果
InputStrings 为
Null 或者不是一维数组,则会发生错误。
由
Filter 函数返回的数组仅包含足以包含匹配项数目的元素。
下面例子利用
Filter 函数返回包含搜索条件 "Mon" 的数组:
Dim MyIndexDim MyArray (3)MyArray(0) = "Sunday"MyArray(1) = "Monday"MyArray(2) = "Tuesday"MyIndex =
Filter(MyArray
, "Mon"
) 'MyIndex(0) 包含 "Monday"。