📄 ch04-05-03.aspx
字号:
<Html>
<Head>
<Title>调整数组的大小</Title>
</Head>
<Body>
<H1>使用ReDim调整数组的大小</H1>
<%
' 宣告一个一维数组
Dim ArrayA(1) As Integer
' 设置数组元素的值
ArrayA(0) = 2
ArrayA(1) = 3
' 以调整前的数组元素值做为文字的字号
Response.Write("<Font Size=" & ArrayA(0) & ">文字的原始字号</Font><BR>")
Response.Write("<Font Size=" & ArrayA(1) & ">文字的原始字号</Font><BR>")
' 扩充数组的大小
ReDim Preserve ArrayA(3)
ArrayA(2) = 4
ArrayA(3) = 5
Response.Write("<Font Size=" & ArrayA(2) & ">调整数组后的文字字号</Font><BR>")
Response.Write("<Font Size=" & ArrayA(3) & ">调整数组后的文字字号</Font><BR>")
%>
</Body>
</Html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -