上一篇:网站备案中
下一篇:超链接确认操作
ASP动态修改数组大小
发布于: 2014/11/13 8:22:39 | 发布在: ASP文章 | 点击:
可以使用Redim和Redim Preserve命令重新定义数组大小。两者的区别是:使用Redim会清除数组原有的数据,而使用Redim Preserve则会保留数组中的原有数据,测试代码如下
<%
Dim A, B, i
A = Array(11,12,13)
B = Array(21,22,23)
Redim A(5) '将数组A最大下标设置为5
Redim Preserve B(5) '将数组B最大下标设置为5,同时保留原有数组元素的值
Response.Write("<p>数组A:")
for i=0 to UBound(A)
Response.Write(A(i) & " ")
next
Response.Write("</p>")
Response.Write("<p>数组B:")
for i=0 to UBound(B)
Response.Write(B(i) & " ")
next
Response.Write("</p>")
%>
Dim A, B, i
A = Array(11,12,13)
B = Array(21,22,23)
Redim A(5) '将数组A最大下标设置为5
Redim Preserve B(5) '将数组B最大下标设置为5,同时保留原有数组元素的值
Response.Write("<p>数组A:")
for i=0 to UBound(A)
Response.Write(A(i) & " ")
next
Response.Write("</p>")
Response.Write("<p>数组B:")
for i=0 to UBound(B)
Response.Write(B(i) & " ")
next
Response.Write("</p>")
%>
这段代码执行效果如下:
数组A:
数组B:21 22 23
可以看到数组A的数据被清空,而数组B的内容被保留了下来。