设为首页收藏本站
开启辅助访问

创星网络[分享知识 传递快乐]

 找回密码
 立即注册

QQ登录

只需一步,快速开始

用新浪微博登录

只需一步,快速搞定

搜索

ASP 使用Filter函数来检索数组

2012-8-8 09:01| 发布者: cryinglily| 查看: 655| 评论: 0|原作者: coolspring

摘要: 在VBScript中有Filter这个函数可以用来对数组进行过滤,并返回原数组的一个子集数组。 语法说明: 引用内容 Filter 函数 返回下标从零开始的 数组,其中包含以特定过滤条件为基础的字符串数组的子集。 Filter(Inpu ...
在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 函数返回的数组仅包含足以包含匹配项数目的元素。
下面例子利用 Filter 函数返回包含搜索条件 "Mon" 的数组:
  1. Dim MyIndex

  2. Dim MyArray (3)

  3. MyArray(0) = "Sunday"

  4. MyArray(1) = "Monday"

  5. MyArray(2) = "Tuesday"

  6. MyIndex = Filter(MyArray, "Mon") 'MyIndex(0) 包含 "Monday"。
复制代码

注意一下,MyIndex是一个数组!~

程序代码

  1. Dim MyIndex,IndexItem
  2. Dim MyArray(2)
  3. MyArray(0) = "Sunday"
  4. MyArray(1) = "Monday"
  5. MyArray(2) = "Monday"  
  6. MyIndex = Filter(MyArray,"Tuesday")
  7. For IndexItem = 0 To UBound(MyIndex)
  8.   Response.Write MyIndex(Monday)&"<br />"
  9. Next
复制代码


鲜花

握手

雷人

路过

鸡蛋

QQ|Archiver|手机版|小黑屋|创星网络 ( 苏ICP备11027519号|网站地图  

GMT+8, 2025-7-3 15:22 , Processed in 0.052128 second(s), 16 queries .

Powered by Discuz! X3

© 2001-2013 Comsenz Inc.

返回顶部