应用与开发技术教程作者蒋忠仁C2课案.pptVIP

* * * * * * * * * * * * * * * * * * * 用Redim来改数组的长度后，数组里的值全部会被清除。如果要改变量组的长度，而不希望数组里原有的值被清除，可以在Redim和数组名之间加上Preserve数组里原有的值就会被保留下来： Redim Preserve数组名(组件个数) 请参考下面这个范例： html script language=VB runat=server Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Dim A(10) As Integer Dim i, j As Integer Dim Text1, Text2 As String For i = 0 to 9 A(i) = i * 10 Next i Redim Preserve A(20) For j = 0 to 19 Text1 = Text1 A数组的第 j+1 个组件:A( j )= A(j) br Next j Label1.Text=Text1 End Sub /scriptbody asp:Label id=label1 runat=server/br asp:Label id=label2 runat=server/br /