.Net 下區(qū)別使用 ByRef/ByVal 的重要性 分享
更新時間:2013年07月24日 10:45:36 作者:
這篇文章介紹了.Net 下區(qū)別使用 ByRef/ByVal 的重要性,有需要的朋友可以參考一下
一直以來在 VB6 下,參數(shù)默認都是按照 ByRef 傳送的,(即按地址傳送)
而在 .Net(C#,VB.Net) 下, 參數(shù)默認是使用 ByVal (即按值傳送) 傳送的,一直沒怎么注意。
這些天在優(yōu)化程序時發(fā)現(xiàn) 當(dāng)傳送 大變量時,使用默認方式(ByVal) 效率相當(dāng)?shù)?BR>如傳入的參數(shù)變量類型 是 大字符串,數(shù)組,集合,DataSet 等
測試的關(guān)鍵代碼如下,我傳入的字符串并沒有特別大,變量越大,使用 ByRef 效率越高,當(dāng)然,當(dāng)傳入得變量可以被修改或無其他作用時,可以改用 ByRef 傳
Private Declare Function GetTickCount Lib "kernel32" () As Int32
Private Function TestByRef(ByRef aa As String) As String
aa = "1" & aa
TestByRef = aa
End Function
Private Function TestByVal(ByVal aa As String) As String
aa = "1" & aa
TestByVal = aa
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim teststr As String
Dim Newstr As String
Dim t As Int32
Dim II As Int32
teststr = "wosdfsdfdsfdsfsfdsfsfsfsfsfsfdsfdsfcvxcvxcvcxvvcxvvvxvcvxv"
t = GetTickCount
For II = 1 To 10000
Newstr = TestByRef(teststr)
Next
MsgBox("ByRef " & CStr(GetTickCount - t))
t = GetTickCount
For II = 1 To 10000
Newstr = TestByVal(teststr)
Next
MsgBox("ByVal " & CStr(GetTickCount - t))
End Sub
而在 .Net(C#,VB.Net) 下, 參數(shù)默認是使用 ByVal (即按值傳送) 傳送的,一直沒怎么注意。
這些天在優(yōu)化程序時發(fā)現(xiàn) 當(dāng)傳送 大變量時,使用默認方式(ByVal) 效率相當(dāng)?shù)?BR>如傳入的參數(shù)變量類型 是 大字符串,數(shù)組,集合,DataSet 等
測試的關(guān)鍵代碼如下,我傳入的字符串并沒有特別大,變量越大,使用 ByRef 效率越高,當(dāng)然,當(dāng)傳入得變量可以被修改或無其他作用時,可以改用 ByRef 傳
復(fù)制代碼 代碼如下:
Private Declare Function GetTickCount Lib "kernel32" () As Int32
Private Function TestByRef(ByRef aa As String) As String
aa = "1" & aa
TestByRef = aa
End Function
Private Function TestByVal(ByVal aa As String) As String
aa = "1" & aa
TestByVal = aa
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim teststr As String
Dim Newstr As String
Dim t As Int32
Dim II As Int32
teststr = "wosdfsdfdsfdsfsfdsfsfsfsfsfsfdsfdsfcvxcvxcvcxvvcxvvvxvcvxv"
t = GetTickCount
For II = 1 To 10000
Newstr = TestByRef(teststr)
Next
MsgBox("ByRef " & CStr(GetTickCount - t))
t = GetTickCount
For II = 1 To 10000
Newstr = TestByVal(teststr)
Next
MsgBox("ByVal " & CStr(GetTickCount - t))
End Sub
相關(guān)文章
asp.net實現(xiàn)的計算網(wǎng)頁下載速度的代碼
剛看到有人給出asp.net實現(xiàn)的計算網(wǎng)頁下載速度的方法,本方法未經(jīng)本人測試,不知道能否可靠性如何。準確來說,這只是個思路吧2013-03-03在ASP.NET?Core微服務(wù)架構(gòu)下使用RabbitMQ實現(xiàn)CQRS模式的方法
ASP.NET Core微服務(wù)架構(gòu)中,使用RabbitMQ作為消息隊列服務(wù),通過實現(xiàn)CQRS模式,將寫操作和讀操作分離,以提高系統(tǒng)的性能和可伸縮性,本文小編將為大家介紹如何在ASP.NET Core微服務(wù)架構(gòu)下使用RabbitMQ來實現(xiàn)CQRS模式,感興趣的朋友一起看看吧2024-01-01asp.net(C#) 動態(tài)添加非ASP的標準html控件(如添加Script標簽)
在開發(fā)程序時,有時需要動態(tài)添加標簽,而有部分又不是ASP控件,偶然找到這段代碼,特收藏。2009-07-07