当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > VBS教程:函数-Filter 函数

VBScript
VBS教程:函数-转换函数
VBS教程:函数-CLng 函数
VBS教程:函数-CInt 函数
VBS教程:函数-Chr 函数
VBS教程:函数-CDbl 函数
VBS教程:函数-CDate 函数
VBS教程:函数-CCur 函数
VBS教程:函数-CByte 函数
VBS教程:函数-CBool 函数
VBS教程:函数-Atn 函数
VBS教程:函数-Asc 函数
VBS教程:函数-Array 函数
VBS教程:函数-Abs 函数
VBS教程:在 VBScript 中使用对象
VBS教程:VBScript 与窗体
VBS教程:VBScript 页面的简单样例
VBS教程:VBScript 基础-VBScript编码约定
VBS教程:VBScript 基础-VBScript 过程
VBS教程:VBScript 基础-使用循环语句
VBS教程:VBScript 基础-使用条件语句

VBScript 中的 VBS教程:函数-Filter 函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 84 ::
收藏到网摘: n/a

Filter 函数

返回下标从零开始的 数组,其中包含以特定过滤条件为基础的字符串数组的子集。

Filter(InputStrings, Value[, Include[, Compare]])

参数

InputStrings

必选项。一维数组,要在其中搜索字符串。

Value

必选项。要搜索的字符串。

Include

可选项。Boolean 值,指定返回的子字符串是否包含 Value。如果 IncludeTrueFilter 将返回包含子字符串 Value 的数组子集。如果 Include FalseFilter 将返回不包含子字符串 Value 的数组子集。

Compare

可选项。数字值指出使用的比较字符串 类型.请参阅值设置部分.

设置

Compare 参数可以有以下值:

常数描述
vbBinaryCompare0执行二进制比较。
vbTextCompare1执行文本比较。

说明

如果在 InputStrings 中没有找到与 Value 匹配的值,Filter 将返回空数组。如果 InputStringsNull 或者不是一维数组,则会发生错误。

Filter 函数返回的数组仅包含足以包含匹配项数目的元素。

下面例子利用 Filter 函数返回包含搜索条件 "Mon" 的数组:

Dim MyIndexDim MyArray (3)MyArray(0) = "Sunday"MyArray(1) = "Monday"MyArray(2) = "Tuesday"MyIndex = Filter(MyArray, "Mon") 'MyIndex(0) 包含 "Monday"