发布于 2016-06-09 11:05:00 | 84 次阅读 | 评论: 0 | 来源: 网友投递

这里有新鲜出炉的精品教程，程序狗速度看过来！

.NET Framework

.NET 是 Microsoft XML Web services 平台。你可以理解为.NET Framework ,XML Web services 允许应用程序通过 Internet 进行通讯和共享数据，而不管所采用的是哪种操作系统、设备或编程语言。Microsoft .NET 平台提供创建 XML Web services 并将这些服务集成在一起之所需。对个人用户的好处是无缝的、吸引人的体验。

---

这篇文章介绍了.Net 下区别使用 ByRef/ByVal 的重要性，有需要的朋友可以参考一下
  一直以来在 VB6 下，参数默认都是按照 ByRef  传送的，(即按地址传送)
而在 .Net(C#,VB.Net) 下， 参数默认是使用 ByVal （即按值传送)  传送的，一直没怎么注意。
这些天在优化程序时发现 当传送 大变量时，使用默认方式（ByVal) 效率相当低
如传入的参数变量类型 是 大字符串，数组，集合，DataSet 等
测试的关键代码如下,我传入的字符串并没有特别大，变量越大，使用 ByRef 效率越高,当然，当传入得变量可以被修改或无其他作用时，可以改用 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