前往顾页
以后地位: 主页 > 收集编程 > Asp实例教程 >

实现获得字符串在数组中的地位法度代码

时候:2011-03-29 22:12来源:知行网www.zhixing123.cn 编辑:麦田守望者

<%
a="abc|ab|efg|hi"
b="ab"
response.write "b在a中的地位是"&getN(a,b)
%>
<%
function getN(x,y)
getN=0
arr=split(x,"|")
for i=0 to ubound(arr)
if arr(i)=y then
getN=i+1
exit function
end if
next
end function
%>

再给你一个:

VBScript code

'查询是不是存在该值
Function seekArrayVal(strArr,strVal)
Dim strBool:strBool=false
If Not IsArray(strArr) Or strVal="" then seekArrayVal=strBool
For Each tmp in strArr
If strVal=tmp then
strBool=true
Exit For
End If
Next
seekArrayVal=strBool
End Function


服从函数
-------------------------------------------------------
function getposition(xstr,keyword)
dim sw, k, ar
dim i
i=0
sw=xstr
k=keyword
ar=split(sw,"|")
do while i <ar.ubound(ar)-1
if ar[i]=k then
getposition=i
exit function
end if
i=i+1
loop
end function
-------------------------------------------------------
a="abc|ab|efg|hi"
有个字符串b ,b="ab"
数组操纵 a=split(a,"|")
获得字符串b在数组a中的地位

利用:
dim posi
posi=getposition(a,b)

顶一下
(0)
0%
踩一下
(0)
0%
------分开线----------------------------
标签(Tag):asp asp实例教程 asp源代码 asp根本教程
------分开线----------------------------
颁发评论
请自发遵循互联网相关的政策法规,严禁公布色情、暴力、革命的谈吐。
评价:
神色:
考证码:点击我更换图片
猜你感兴趣