1
<body>
2
<h1>獲得數組維數的最大索引值</h1>
3
<%
4
dim arrayA(10) as integer
5
response.write("獲取一維數組的最大索引值,結果為" & ubound(arrayA) & "<br>")
6
dim arrayB(15,20) as integer
7
response.write("獲取二維數組第一維度的最大索引值,結果為"& ubound(arrayB,1) &"<br>")
8
response.write("獲取二維數組第二維度的最大索引值,結果為"& ubound(arrayB,2)&"<br>")
9
%>
10
</body>

2

3

4

5

6

7

8

9

10

Dim ArrayA as integer() = (1,2,3,4,5)
相當于聲明一個ArrayA(4)的一維數組