ASP 使用Filter函数来检索数组的实现代码
网络编程 2021-07-05 10:58www.168986.cn编程入门
在VBScript中有Filter这个函数可以用来对数组进行过滤,并返回原数组的一个子集数组。
语法说明:
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 函数返回的数组仅包含足以包含匹配项数目的元素。
狼蚁网站SEO优化例子利用 Filter 函数返回包含搜索条件 "Mon" 的数组:
Dim MyIndex
Dim MyArray (3)
MyArray(0) = "Sunday"
MyArray(1) = "Monday"
MyArray(2) = "Tuesday"
MyIndex = Filter(MyArray, "Mon") 'MyIndex(0) 包含 "Monday"。
在红色的位置需要注意一下,MyIndex是一个数组!~
Dim MyIndex,IndexItem
Dim MyArray(2)
MyArray(0) = "Sunday"
MyArray(1) = "Monday"
MyArray(2) = "Monday"
MyIndex = Filter(MyArray,"Tuesday")
For IndexItem = 0 To UBound(MyIndex)
Response.Write MyIndex(Monday)&"<br />"
Next
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 函数返回的数组仅包含足以包含匹配项数目的元素。
狼蚁网站SEO优化例子利用 Filter 函数返回包含搜索条件 "Mon" 的数组:
代码如下:
Dim MyIndex
Dim MyArray (3)
MyArray(0) = "Sunday"
MyArray(1) = "Monday"
MyArray(2) = "Tuesday"
MyIndex = Filter(MyArray, "Mon") 'MyIndex(0) 包含 "Monday"。
在红色的位置需要注意一下,MyIndex是一个数组!~
代码如下:
Dim MyIndex,IndexItem
Dim MyArray(2)
MyArray(0) = "Sunday"
MyArray(1) = "Monday"
MyArray(2) = "Monday"
MyIndex = Filter(MyArray,"Tuesday")
For IndexItem = 0 To UBound(MyIndex)
Response.Write MyIndex(Monday)&"<br />"
Next
上一篇:ASP JSON类源码分享
下一篇:asp 批量删除选中的多条记录的实现代码
编程语言
- 机械手焊接机器人编程 机械手焊接设备编程
- vb数据库编程实例,vb做数据库
- tiobe世界编程语言排行榜,全球编程语言排行
- 成都java编程培训 成都it编程培训中心
- 编程基础培训,编程基础知识培训
- flash游戏编程基础教程,flash游戏开发教程
- 不会英语能学编程吗 不会英语可以学程序员吗
- 爱心代码编程C语言 爱心代码编程c语言公式
- c语言编程学习入门 c语言编程快速入门
- 西门子plc编程培训 西门子plc编程培训班
- 哪里可以学编程 台州哪里可以学编程
- 少儿编程哪个好 少儿编程哪个品牌好
- 编程是什么意思,图形编程是什么意思
- c语言编程软件下载,c语言编程软件在哪下载
- java编程软件下载,java编程下载手机版
- ug编程培训学校,ug编程培训教程