VB.NET數(shù)組賦值怪異現(xiàn)象的示例分析

這篇文章給大家分享的是有關(guān)VB.NET數(shù)組賦值怪異現(xiàn)象的示例分析的內(nèi)容。小編覺(jué)得挺實(shí)用的，因此分享給大家做個(gè)參考，一起跟隨小編過(guò)來(lái)看看吧。

在寫程序過(guò)程中發(fā)現(xiàn)了VB.NET數(shù)組賦值時(shí)出現(xiàn)了一個(gè)奇怪的現(xiàn)象,就是給數(shù)組給數(shù)組賦值時(shí)竟然是"指向數(shù)組的地址",即數(shù)組給數(shù)組賦值時(shí)不是生成一個(gè)新的值后傳給數(shù)組保存,而是傳給該數(shù)組的地址給數(shù)組.

打個(gè)比方:有數(shù)組A和數(shù)組B.現(xiàn)在把數(shù)組B賦給數(shù)組A.而則時(shí)數(shù)組A不是保存數(shù)組B的值而是保存數(shù)組B的內(nèi)存地址,這就產(chǎn)生一個(gè)問(wèn)題:如果數(shù)組B的值改變則數(shù)組A的值也跟著改變!!!....而在ASP就不是這樣情況,VB也可能不是這樣,我的機(jī)沒(méi)有VB.所以測(cè)試不了...

這樣說(shuō)可能還不是很清楚(我的表達(dá)能力就是很差),給一段VB.NET數(shù)組賦值的示例代碼就知:

VB.NET數(shù)組賦值的代碼:

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  

運(yùn)行上面代碼你可發(fā)現(xiàn),五次顯示的結(jié)果都是一樣的...如果你以為RANDOM時(shí)產(chǎn)生相同的值,那么你可以使用一步步調(diào)試.在"自動(dòng)窗口"中你會(huì)發(fā)現(xiàn)每當(dāng)循環(huán)時(shí),Test(i-1)里面的值總是跟著Test(i)的值改變....這也說(shuō)明了我在上面所說(shuō)的問(wèn)題,即數(shù)組賦值給數(shù)組時(shí)是"傳址"而不是"傳值"保存....但如果不是數(shù)組則不會(huì)有這樣的情況出現(xiàn)!解決方法是把RandomText(1) As String的定義放到***個(gè)循環(huán)的里面即可,即每循環(huán)一次生成一個(gè)新的數(shù)組

讓我們看看在ASP里會(huì)不會(huì)也是跟VB.NET數(shù)組賦值相同的情況吧
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) & "< br>"   
Next   
%>  

運(yùn)行后你會(huì)發(fā)現(xiàn)5行的數(shù)據(jù)都是不同的!!!即在ASP里數(shù)組賦值給數(shù)組是"傳值"而不是"傳址"保存!!!!

感謝各位的閱讀！關(guān)于“VB.NET數(shù)組賦值怪異現(xiàn)象的示例分析”這篇文章就分享到這里了，希望以上內(nèi)容可以對(duì)大家有一定的幫助，讓大家可以學(xué)到更多知識(shí)，如果覺(jué)得文章不錯(cuò)，可以把它分享出去讓更多的人看到吧！