Visual Basic Filter 函数

定义和用法

Filter 函数可返回一个基于 0 的数组，此数组包含以特定过滤条件为基础的字符串数组的子集。

注释：如果找不到与 value 参数相匹配的值，Filter 函数会返回一个空数组。

注释：若参数 inputstrings 为 Null 或者不是一维数组，则会发生错误。

语法

Filter(inputstrings,value[,include[,compare]])

参数	描述
inputstrings	必需的。需检索的一维字符串数组。
value	必需的。要搜索的字符串。
include	可选项。Boolean 值，指定返回的子字符串是否包含 Value。如果 Include 为 True，Filter 将返回包含子字符串 Value 的数组子集。如果 Include 为 False，Filter 将返回不包含子字符串 Value 的数组子集。
compare	可选的。规定所使用的字符串比较类型。

参数 compare 的值：

常数	值	描述
vbBinaryCompare	0	执行二进制比较。
vbTextCompare	1	执行文本比较。

实例

例子 1

Module Module1
    Sub Main()
        Dim a(4),b
        a(0)="Saturday"
        a(1)="Sunday"
        a(2)="Monday"
        a(3)="Tuesday"
        a(4)="Wednesday"
        b=Filter(a,"n")
        Console.WriteLine(b(0))
        Console.WriteLine(b(1))
        Console.WriteLine(b(2))
    End Sub
End Module

运行一下

输出：

Sunday
Monday
Wednesday

例子 2

Module Module1
    Sub Main()
        Dim a(4),b
        a(0)="Saturday"
        a(1)="Sunday"
        a(2)="Monday"
        a(3)="Tuesday"
        a(4)="Wednesday"
        b=Filter(a,"n",false)
        Console.WriteLine(b(0))
        Console.WriteLine(b(1))
        Console.WriteLine(b(2))
    End Sub
End Module

运行一下

输出：

Saturday
Tuesday

Visual Basic Filter 函数

定义和用法

语法

参数 compare 的值：

实例

例子 1

例子 2

分类导航