a=split(str,",")
for i=0 to ubound(a)
b(i)=a(i)
next

a=split(str,",") /*将str字符串以豆号形式分割放入数组a中*/
for i=0 to ubound(a) /* ubound获得数组下标*/
b(i)=a(i) /* 用循环方式把a数组中的每个值传到b数组中*/
next

我知道的就这些，

谢谢各位的回答
我还想请教一下，就象楼上所写的代码
把它们一个个分开后，我还有9个文框，结果显示时要第一个文本框中要有1，第二个文本框要有2，以此类推，这又如何实现啊

谢谢行者，我还想请教一下，如下
a=split(request("unitid"),",")
for i=0 to ubound(a)

set conn=server.createobject("adodb.connection")
conn.Open strDBDSN
set rs=server.createobject("adodb.recordset")
sql="Select * from count where unitid='"&a(i)&"' order by count_id desc"
rs.open sql,conn,0,1

next

这些代码中的Select * from count where unitid='"&a(i)&"' order by count_id desc中的unitid='"&a(i)&"'好像是错误的，但不知怎么写

CINT是如下这么用法吗？好像不会来，提示类型不匹配
Select * from count where unitid='"&CINT(a(i))&"' order by count_id desc

谢谢三色，好像是不会出错了，但是还是不能完成统计要求，不好意思，再麻烦您一下，就是用户在前台可能在unitid字段的复选框选定多个内容（例如选定好后传送过来的字段内容有：01，02，03...），那在统计的时候我该怎么分别把符合01，02，03...的内容进行统计啊（就是unitid=01，unitid也要=02，unitid也要=03...），下面的程序肯定是不行的，不知怎么写，请指教

a=split(request("unitid"),",")
for i=0 to ubound(a)

set conn=server.createobject("adodb.connection")
conn.Open strDBDSN
set rs=server.createobject("adodb.recordset")
sql=（这一行怎么写啊）
rs.open sql,conn,0,1

next

谢谢行者，好像提示CINT类型不匹配，不知怎么改
另，如果我还有一个字段，是不是用and连接啊，如
and
SQL = "Select * from count where ("
b=split(request("yearnow"),",")
for i=0 to ubound(b)
SQL = SQL + "unitid=" & CINT(b(i)) & " and "
next
SQL = SQL + ")"