当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > VB.NET里奇怪的数组赋值现象

ASP.NET
AspectSharp中的代理对象
关于“使用xmlspy编写xsl文件时候,在xsl解释xml文件的时候总是使用utf-16编码”的...
如何获取本机IP?
演练:在Excel中建立自定义菜单项
Microsoft.UI.WebControl.TreeView控件的扩充使用
C#中控制流程
如何通过.Net Compact Framework来获得应用程序的当前路径
用C#快速往Excel写数据
恼人的OleDb Bug
OpenAsTextStream 方法
Visual Studio 2005 Express Beta Products所有的完整安装包。
动态下拉菜单的简单实现
如何调用他人提供的Web Service
VB6实现在Win2000/XP上隐藏进程
CSharp读写SQL Server数据库中的Image列
OA架构设计之启示
VB6使用API下载文件
激活程序的disabled的按钮
定时检测邮件并且自动转发的例子
使程序在Windows任务管理器隐藏

ASP.NET 中的 VB.NET里奇怪的数组赋值现象


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 168 ::
收藏到网摘: n/a

今天在写程序过程中发现了.NET里的一个奇怪现象,就是给数组给数组赋值时竟然是"指向数组的地址",即数组给数组赋值时不是生成一个新的值后传给数组保存,而是传给该数组的地址给数组.打个比方:有数组A和数组B.现在把数组B赋给数组A.而则时数组A不是保存数组B的值而是保存数组B的内存地址,这就产生一个问题:如果数组B的值改变则数组A的值也跟着改变!!!....而在ASP就不是这样情况,VB也可能不是这样,我的机没有VB.所以测试不了...

这样说可能还不是很清楚(我的表达能力就是很差),给一段示例代码就知:
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怎么变了??很多东西都变了...变得习惯了还是不习惯了?