VB.NET里奇怪的数组赋值现象
VB.NET里奇怪的数组赋值现象,VB.NET里奇怪的数组赋值现象
这样说可能还不是很清楚(我的表达能力就是很差),给一段示例代码就知:
VB.NET的代码:
Sub TestCode()
Dim Test(4) As Array, RandomText(1) As String
Dim Ran As New Random, i, j As Integer
For i = 0 To 4
For j = 0 To 1
RandomText(j) = Ran.Next(100)
Next
Test(i) = RandomText
Next
For i = 0 To 4
MsgBox(Test(i)(0) & "|" & Test(i)(1))
Next
End Sub
运行上面代码你可发现,五次显示的结果都是一样的...如果你以为RANDOM时产生相同的值,那么你可以使用一步步调试.在"自动窗口"中你会发现每当循环时,Test(i-1)里面的值总是跟着Test(i)的值改变....这也说明了我在上面所说的问题,即数组赋值给数组时是"传址"而不是"传值"保存....但如果不是数组则不会有这样的情况出现!解决方法是把RandomText(1) As String的定义放到第一个循环的里面即可,即每循环一次生成一个新的数组
让我们看看在ASP里会不会也是相同的情况吧
ASP代码:
<%@LANGUAGE="VBSCRIPT"%>
<%
Randomize
Dim Test(4), RandomText(1)
Dim Ran, i, j
For i = 0 To 4
For j = 0 To 1
RandomText(j) = Int(Rnd(Time)*100+1)
Next
Test(i) = RandomText
Next
For i = 0 To 4
Response.Write Test(i)(0) & "|" & Test(i)(1) & "
"
Next
%>
运行后你会发现5行的数据都是不同的!!!即在ASP里数组赋值给数组是"传值"而不是"传址"保存!!!!
.NET怎么变了??很多东西都变了...变得习惯了还是不习惯了?