关于判断数组

slyq=rs("数量")
slyqq = split(slyq,",")
怎么判断数组中有几个无字，
有1个无字
执行代码
有2个无字
执行代码
有3个无字
执行代码
有4个无字
执行代码

这样该怎么判断呢

数组中？你是说每个元素中有无字？

slyq="碎片,无,碎片一,无，碎片二"  //这个是动态的，不是静态
slyqq = split(slyq,",")
怎么判断数组中有几个无字，
有1个无字
执行代码
有2个无字
执行代码
有3个无字
执行代码
有4个无字
执行代码

如果是你给定的字符串，有多个办法来处理，其中之一，仅供参考：

1. <%
   
2. Dim intCounter
   
3. Dim strTest, strKeyWord
   
4. 
   
5. strKeyWord="碎"
   
6. strTest="碎片,无,碎片一,无，碎片二"
   
7. '//指定关键词出现次数
   
8. intCounter=ubound(split(strTest,strKeyWord))
   
9. 
   
10. Response.Write("关键词【"&strKeyWord&"】在测试字符串【"&strTest&"】中：")
    
11. 
    
12. Select Case intCounter
    
13.         Case 1
    
14.         Response.Write "出现1次"
    
15. 
    
16.         Case 2
    
17.         Response.Write "出现2次"
    
18. 
    
19.         Case 3
    
20.         Response.Write "出现3次"
    
21. 
    
22.         Case else
    
23.         Response.Write "未发现指定关键词"
    
24. End Select        
    
25.   
    
26. %>

复制代码