VB.NET数组赋值怪异现象揭秘
创始人
2024-06-21 05:20:26
0

VB.NET数组的应用是一个非常重要的知识点。初学者们必须要在学习的过程中对此加强注意力。今天在写程序过程中发现了VB.NET数组赋值时出现了一个奇怪的现象,就是给数组给数组赋值时竟然是"指向数组的地址",即数组给数组赋值时不是生成一个新的值后传给数组保存,而是传给该数组的地址给数组.

打个比方:有数组A和数组B.现在把数组B赋给数组A.而则时数组A不是保存数组B的值而是保存数组B的内存地址,这就产生一个问题:如果数组B的值改变则数组A的值也跟着改变!!!....而在ASP就不是这样情况,VB也可能不是这样,我的机没有VB.所以测试不了...

这样说可能还不是很清楚(我的表达能力就是很差),给一段VB.NET数组赋值的示例代码就知:

VB.NET数组赋值的代码:

  1. Sub TestCode()   
  2. Dim Test(4) As Array, 
    RandomText(1) As String   
  3. Dim Ran As New Random, 
    i, j As Integer   
  4. For i = 0 To 4   
  5. For j = 0 To 1   
  6. RandomText(j) = Ran.Next(100)   
  7. Next   
  8. Test(i) = RandomText   
  9. Next   
  10. For i = 0 To 4   
  11. MsgBox(Test(i)(0) & "|" 
    & Test(i)(1))   
  12. Next   
  13. End Sub  

运行上面代码你可发现,五次显示的结果都是一样的...如果你以为RANDOM时产生相同的值,那么你可以使用一步步调试.在"自动窗口"中你会发现每当循环时,Test(i-1)里面的值总是跟着Test(i)的值改变....这也说明了我在上面所说的问题,即数组赋值给数组时是"传址"而不是"传值"保存....但如果不是数组则不会有这样的情况出现!解决方法是把RandomText(1) As String的定义放到***个循环的里面即可,即每循环一次生成一个新的数组

让我们看看在ASP里会不会也是跟VB.NET数组赋值相同的情况吧
ASP代码:

  1. < %@LANGUAGE="VBSCRIPT"%>   
  2. < %   
  3. Randomize   
  4. Dim Test(4), RandomText(1)   
  5. Dim Ran, i, j   
  6. For i = 0 To 4   
  7. For j = 0 To 1   
  8. RandomText(j) = Int
    (Rnd(Time)*100+1)   
  9. Next   
  10. Test(i) = RandomText   
  11. Next   
  12. For i = 0 To 4   
  13. Response.Write Test(i)(0) & 
    "|" & Test(i)(1) & "< br>"   
  14. Next   
  15. %>  

运行后你会发现5行的数据都是不同的!!!即在ASP里数组赋值给数组是"传值"而不是"传址"保存!!!!

【编辑推荐】

  1. VB.NET自定义属性应用方式解析
  2. VB.NET异常迭代捕捉代码示例
  3. VB.NET共享成员变量创建技巧解析
  4. 范例解读VB.NET获取环境变量
  5. VB.NET抓取网页相关问题解决方法

相关内容

热门资讯

如何允许远程连接到MySQL数... [[277004]]【51CTO.com快译】默认情况下,MySQL服务器仅侦听来自localhos...
如何利用交换机和端口设置来管理... 在网络管理中,总是有些人让管理员头疼。下面我们就将介绍一下一个网管员利用交换机以及端口设置等来进行D...
施耐德电气数据中心整体解决方案... 近日,全球能效管理专家施耐德电气正式启动大型体验活动“能效中国行——2012卡车巡展”,作为该活动的...
Windows恶意软件20年“... 在Windows的早期年代,病毒游走于系统之间,偶尔删除文件(但被删除的文件几乎都是可恢复的),并弹...
20个非常棒的扁平设计免费资源 Apple设备的平面图标PSD免费平板UI 平板UI套件24平图标Freen平板UI套件PSD径向平...
德国电信门户网站可实时显示全球... 德国电信周三推出一个门户网站,直观地实时提供其安装在全球各地的传感器网络检测到的网络攻击状况。该网站...
着眼MAC地址,解救无法享受D... 在安装了DHCP服务器的局域网环境中,每一台工作站在上网之前,都要先从DHCP服务器那里享受到地址动...
为啥国人偏爱 Mybatis,... 关于 SQL 和 ORM 的争论,永远都不会终止,我也一直在思考这个问题。昨天又跟群里的小伙伴进行...