asp中redim和ubound的用法

ASP   2025-02-22 13:01   58   0  
<%
dim s,t,i
s="zhong"
redim t(len(s)-1)
for i=1 to len(s)
	t(i-1)=mid(s,i,1)
next

'测试结果
for i=0 to ubound(t)
	response.write t(i) & "<br>"
next
%>


打印结果:
z
h
o
n
g


博客评论
还没有人评论,赶紧抢个沙发~
发表评论
说明:请文明发言,共建和谐网络,您的个人信息不会被公开显示。