<% dim a a="*|***|*****|*******|*****|***|*" '字符串 strs=split(a,"|",-1,1) '数组strs for i=0 to ubound(strs) 'for循环 str=strs(i) response.write(str&"") '输出*号 next %>你补充的内容是什么??没看懂你的意思??