源程序如下：
<html>
<head>
<title>动态数组应用实例</title>
</head>
<body>
<%
ReDim Array1(10)
Dim i '设置循环变量
For i = 0 To 10
Array1(i) = 100
Next
ReDim Preserve Array1(5)
Redim Preserve Array1(10)
For i = 0 To 10
Response.Write "Array1("&CStr(i)&")="&CStr(Array1(i))&"<br>"
Next
%>
</body>
</html>
2007-02-28 16:29
下边的这段代码在浏览器中输出的格式为：
Array1(0)=100
Array1(1)=100
Array1(2)=100
Array1(3)=100
Array1(4)=100
Array1(5)=100
Array1(6)=
Array1(7)=
Array1(8)=
Array1(9)=
Array1(10)=
请问红色标记的那两句是什么意思哦！我觉得输出的结果应该是：
Array1(0)=100
Array1(1)=100
Array1(2)=100
Array1(3)=100
Array1(4)=100
Array1(5)=100
Array1(6)=100
Array1(7)=100
Array1(8)=100
Array1(9)=100
Array1(10)=100
2007-02-28 16:30
源程序如下：
<html>
<head>
<title>动态数组应用实例</title>
</head>
<body>
<%
ReDim Array1(10) '声明Array1数组 长度为11
Dim i '设置循环变量
'这里是循环并给数组赋值
For i = 0 To 10 '这里数组中的所有元素的值都是100
Array1(i) = 100
Next
ReDim Preserve Array1(5) '这里重新声明了Array1数组的长度 为6 原来的后5个元素丢失
Redim Preserve Array1(10) '这里又重新声明了Array1数组的长度 为11 前6个元素值都是100 后5个元素都没有赋值
For i = 0 To 10 '循环输出数组元素
Response.Write "Array1("&CStr(i)&")="&CStr(Array1(i))&"<br>"
Next
%>
</body>
</html>
ReDim是声明动态数组变量或重新分配存储空间
我也做了解释 楼主你自己研究一下吧
2007-03-01 09:05
