a=1,2,3,4,5
其中a共有5个数字..
如何判断a是否有5个数字，（a里面的数字是变动的，有时２个有时３个，有时.....）
如何算出a里面一共有多少个？？

[[italic] 本帖最后由 35maoe 于 2008-1-3 08:15 编辑 [/italic]]

第一种方法:
用len
<%
Dim a,lengths
a="1,2,3,4,5,6"
lengths=len(a)
lengths=lengths-(lengths-1)/2
Response.Write(""&lengths&"<br />")
%>

第二种方法:
先用split
aa = Split(a,",")
再用ubound
lengths=ubound(aa)+1

<%
Dim a,aa,lengths
a="1,2,3,4,5,6"
aa = Split(a,",")
lengths=ubound(aa)+1
Response.Write(""&lengths&"<br />")
%>

第二种方法:
用InstrRev

<%
Dim a,aa,lengths
a="1,2,3,4,5,6"
lengths=InstrRev (""&a&"",",")
lengths=lengths-(lengths/2)+1
Response.Write(""&lengths&"<br />")
%>

还有很多很多的方法,LZ自己去思考,希望可以看到你自己的更加好的方法

[[italic] 本帖最后由 hangxj 于 2008-1-3 10:32 编辑 [/italic]]

谢谢楼上的，我用第二种方法，请问如何把a里面的数值循环出来呢？
显示如下：

１
２
３
４
５
６

for i=0 to ubound(aa)
Response.Write(""&aa(i)&"<br />")
next

无非就是读取aa数组中的值