VB.NET 入門教程
摘要：《Visual Basic .NET 入門指南》介紹了 Visual Basic 語言的幾種新功能，從而能充分利用 .NET 平臺。下面的示例應(yīng)用程序示范了如何構(gòu)建一個(gè)實(shí)現(xiàn) QuickSort 算法的簡單 Visual Basic .NET 項(xiàng)目來。
下載
Quicksort_Visual_Basic_.NET.exe。
簡介
Visual Basic .NET 將許多新的功能引入 Visual Basic 語言，使之能夠充分利用 .NET 平臺。以前版本的程序員將需要稍作調(diào)整才能轉(zhuǎn)到 .NET 版本上。
下面的示例應(yīng)用程序示范了如何構(gòu)建一個(gè)實(shí)現(xiàn) QuickSort 算法的簡單 Visual Basic .NET 項(xiàng)目來。它包括了 Visual Basic .NET 程序的基本組成部分：讀/寫控制臺和文件、創(chuàng)建函數(shù)和使用基本數(shù)組。
這些入門指南并不打算涵蓋該編程語言的所有方面。它們只是您探索這種語言的一個(gè)起點(diǎn)。我們鼓勵(lì)您按照本教程的說明執(zhí)行，因?yàn)樗?QuickSort 應(yīng)用程序的各個(gè)不同部分。您還可以獲得完整的源代碼和項(xiàng)目文件。
建議的要求
編譯此示例應(yīng)用程序需要 Visual Studio.NET（測試版 2 或更高版本）。關(guān)于 Visual Basic 的知識是有幫助的但不是必需的。
步驟 1. 開始項(xiàng)目
Visual Studio 中的開發(fā)工作以解決方案的形式進(jìn)行組織，每個(gè)解決方案包含一個(gè)或多個(gè)項(xiàng)目。在本教程中，我們創(chuàng)建的解決方案包含一個(gè) Visual Basic 項(xiàng)目。
創(chuàng)建一個(gè)新項(xiàng)目
1.
在 Visual Studio .NET 環(huán)境中，從菜單中選擇 File | New | Project。
2.
在左側(cè)選擇 Visual Basic，然后在右側(cè)選擇 Console Application。
3.
指定項(xiàng)目的名稱，然后輸入創(chuàng)建項(xiàng)目的位置。Visual Studio 會(huì)自動(dòng)創(chuàng)建項(xiàng)目目錄。
4.
單擊 OK，現(xiàn)在就正式開始了！
Visual Basic 解決方案
Visual Studio .NET 已經(jīng)創(chuàng)建了含有一個(gè)簡單 Visual Basic 項(xiàng)目的解決方案。該項(xiàng)目包含兩個(gè)文件：assemblyinfo.vb 和 module1.vb。
接下來的幾個(gè)步驟將討論這些不同的文件以及如何編譯該項(xiàng)目。
步驟 2. Hello, World!
很遺憾，但我們?nèi)匀粺o法抵御這種誘惑……我們還是不得不完成一個(gè)經(jīng)典的"Hello, World!"應(yīng)用程序，這個(gè)應(yīng)用程序最初是用 C 語言編寫的。
修改源代碼
1.
在 Solution Explorer 中雙擊文件"module1.vb"?？梢酝ㄟ^ View 菜單來顯示 Solution Explorer。
2.
更改預(yù)生成的模板 (module1.vb)，如下面以斜體突出顯示的 代碼所示。
' Import namespaces Imports System Module Module1 Sub Main() Console.WriteLine ("Hello, VISUAL BASIC .NET World!") End Sub End Module
3.
注意，當(dāng)您鍵入代碼時(shí)，Visual Studio 將為您提示類和函數(shù)的名稱（因?yàn)?.NET 框架發(fā)布了這種類型信息）。
編譯應(yīng)用程序
1.
既然您已經(jīng)完成了修改，就可以通過在 Build 菜單中簡單地選擇 Build 來編譯 Visual Basic 項(xiàng)目。
2.
來自 Visual Basic 編譯器的錯(cuò)誤和消息將顯示在 Output 窗口中。如果沒有錯(cuò)誤，則可以通過單擊 Debug 菜單下的 Start without Debugging 來運(yùn)行 Hello World 應(yīng)用程序。
程序輸出
在 Visual Studio 環(huán)境中運(yùn)行 Hello World 示例應(yīng)用程序時(shí)，輸出的屏幕截圖如下。
理解更改
System.Console 類的 WriteLine() 函數(shù)打印傳遞給它的字符串，其后緊跟一行新的字符。此函數(shù)可以接受許多其他數(shù)據(jù)類型（包括整型和浮點(diǎn)型）的參數(shù)。
在程序加載完成后，控制就傳遞給 Main() 函數(shù)。這就是我們在該過程中插入對 WriteLine() 的調(diào)用的原因。
步驟 3. 程序結(jié)構(gòu)
既然我們已經(jīng)構(gòu)建了一個(gè)簡單的 Hello World 應(yīng)用程序，那么就讓我們停下來分析一下 Visual Basic .NET 應(yīng)用程序的基本組成部分。
源代碼注釋
單引號 ' 將行的剩余部分標(biāo)記為一個(gè)注釋，這樣 Visual Basic .NET 編譯器就會(huì)忽略它。
' This line is ignored by the compiler.' This line is also ignored by Visual Basic .NET compiler.
Imports 指令
.NET 框架為開發(fā)人員提供了許多有用的類。例如，Console 類處理對控制臺窗口的輸入和輸出。這些類是按照層次樹的形式組織的。Console 類的全限定名實(shí)際上是 System.Console。其他的類包括 System.IO.FileStream 和 System.Collections.Queue。
Imports 指令允許您在不使用全限定名的情況下引用命名空間中的類。以斜體突出顯示的 代碼應(yīng)用了 Imports 指令。
Imports SystemModule Module1Sub Main()System.Console.WriteLine("Hello, Visual Basic .NET World!")Console.WriteLine("Hello, Visual Basic .NET World!")End SubEnd Module模塊定義
在 Visual Basic 中，所有的函數(shù)都必須封裝在類或模塊中。一個(gè)類可以有多個(gè)實(shí)例（帶有成員變量和函數(shù)）。然而，模塊只包含函數(shù)，并且不能進(jìn)行實(shí)例化。就 Hello World 應(yīng)用程序來說，Module1 模塊包含一個(gè)函數(shù)，即 Main() 函數(shù)。
在本入門指南中，我們并不打算深入地介紹類或模塊，但是我們將為您簡要概述為什么它們是我們示例應(yīng)用程序的一部分。
Main() 函數(shù)
在應(yīng)用程序加載到內(nèi)存之后，Main() 過程就會(huì)接收控制，因此，應(yīng)該將應(yīng)用程序啟動(dòng)代碼放在此函數(shù)中。
步驟 4. 控制臺輸入
現(xiàn)在，我們將繼續(xù)編寫 QuickSort 應(yīng)用程序。我們需要做的第一件事就是提示用戶提供輸入和輸出文件。
修改源代碼
更改 Visual Basic 源文件 (module1.vb)，如下面以斜體突出顯示的代碼所示。其他的差異（如類名）可忽略不計(jì)。
' Import namespacesImports SystemModule Module1Sub Main()' Describe program functionConsole.WriteLine ("QuickSort VISUAL BASIC .NET Sample Application")Console.WriteLine ()' Prompt user for filenamesDim szSrcFile, szDestFile As StringConsole.Write("Source: ")szSrcFile = Console.ReadLine()Console.Write("Output: ")szDestFile = Console.ReadLine()End SubEnd Module從控制臺進(jìn)行讀取
Console 類的 ReadLine() 方法提示用戶輸入，并返回輸入的字符串。它會(huì)自動(dòng)地為字符串處理內(nèi)存分配，由于使用了 .NET 垃圾回收器，您不需要做任何釋放內(nèi)存的工作。
程序輸出
從菜單中選擇 Debug | Start Without Debugging 來運(yùn)行程序。這是到此為止來自 QuickSort 應(yīng)用程序的輸出的屏幕截圖。
步驟 5. 使用數(shù)組
在對從輸入讀取的行進(jìn)行排序之前，程序需要將其存儲到一個(gè)數(shù)組中。我們將簡要討論可實(shí)現(xiàn)對象數(shù)組的 .NET 基類的用法。
修改源代碼
更改 Visual Basic 源文件 (module1.vb)，如下面以斜體突出顯示的代碼所示。其他的差異（如類名）可忽略不計(jì)。
' Import namespacesImports SystemImports System.CollectionsModule Module1Sub Main()' Describe program functionConsole.WriteLine ("QuickSort Visual Basic .NET Sample Application")Console.WriteLine ()' Prompt user for filenamesDim szSrcFile, szDestFile As StringConsole.Write("Source: ")szSrcFile = Console.ReadLine()Console.Write("Output: ")szDestFile = Console.ReadLine()' TODO: Read contents of source fileDim szContents As ArrayListszContents = New ArrayList()End SubEnd Module
使用 ArrayList 類
我們將導(dǎo)入 System.Collections 命名空間，這樣我們就可以直接引用 ArrayList。此類實(shí)現(xiàn)大小可動(dòng)態(tài)調(diào)整的對象數(shù)組。要插入新的元素，可以簡單地將對象傳遞到 ArrayList 類的 Add() 方法。新的數(shù)組元素將引用原始的對象，而垃圾回收器將處理它的釋放。
Dim szElement As StringDim szArray As New ArrayList ()szElement = "insert-me"szArray.Add (szElement)
要檢索現(xiàn)有的元素，請將所需元素的索引傳遞給 Item() 方法。另外，作為一種簡寫形式，還可以使用圓括號 operator ()，它實(shí)際上映射到 Item() 方法。
Console.WriteLine (szArray(2))Console.WriteLine (szArray.Item (2))
ArrayList 類中還有許多其他方法，但是插入和檢索都是我們需要在此示例中使用的。請查閱 MSDN 庫以獲得完整的參考指南。
步驟 6. 文件輸入/輸出
現(xiàn)在，讓我們來實(shí)現(xiàn)讀取輸入文件和寫入輸出文件。我們將每一行讀取到一個(gè)字符串?dāng)?shù)組中，然后輸出該字符串?dāng)?shù)組。在下一步中，我們將使用 QuickSort 算法來對該數(shù)組進(jìn)行排序。
修改源代碼
更改 Visual Basic 源文件 (module1.vb)，如下面以斜體突出顯示的代碼所示。其他的差異（如類名）可忽略不計(jì)。
' Import namespacesImports SystemImports System.CollectionsImports System.IOModule Module1Sub Main()... ... ...' Read contents of source fileDim szSrcLine As StringDim szContents As ArrayListDim fsInput As FileStreamDim srInput As StreamReaderszContents = New ArrayList()fsInput = New FileStream(szSrcFile, FileMode.Open, FileAccess.Read)srInput = New StreamReader(fsInput)szSrcLine = srInput.ReadLine()While Not IsNothing(szSrcLine)' Append to arrayszContents.Add(szSrcLine)szSrcLine = srInput.ReadLine()End WhilesrInput.Close()fsInput.Close()' TODO: Pass to QuickSort function' Write sorted linesDim fsOutput As FileStreamDim srOutput As StreamWriterDim nIndex As IntegerfsOutput = New FileStream(szDestFile, FileMode.Create, _FileAccess.Write)srOutput = New StreamWriter(fsOutput)For nIndex = 0 To szContents.Count – 1' Write line to output filesrOutput.WriteLine(szContents(nIndex))Next nIndexsrOutput.Close()fsOutput.Close()' Report program successConsole.WriteLine()Console.WriteLine("The sorted lines have been written.")Console.WriteLine()End SubEnd Module從源文件進(jìn)行讀取
使用 FileStream 類打開源文件，然后加入 StreamReader 類，這樣我們就可以使用它的 ReadLine() 方法了。現(xiàn)在，我們調(diào)用 ReadLine() 方法，直到它返回 null，這表示到達(dá)文件結(jié)尾。在循環(huán)過程中，我們將讀取的行存儲到字符串?dāng)?shù)組中，然后關(guān)閉這兩個(gè)對象。
寫入輸出文件
假設(shè)已經(jīng)用 QuickSort 對字符串?dāng)?shù)組進(jìn)行了排序，接下來要做的事情就是輸出數(shù)組的內(nèi)容。按照同樣的方式，我們將 StreamWriter 對象附加到 FileStream 對象上。這使得我們可以使用 WriteLine() 方法，該方法能夠很方便地模仿 Console 類的行為。一旦遍歷了數(shù)組，我們便可以像前面一樣關(guān)閉這兩個(gè)對象。
步驟 7. 創(chuàng)建函數(shù)
最后一步就是創(chuàng)建一個(gè)函數(shù)來在字符串?dāng)?shù)組中運(yùn)行 QuickSort。我們將此函數(shù)放到應(yīng)用程序類 QuickSortApp 之中。
修改源代碼
更改 Visual Basic 源文件 (module1.vb)，如下面以斜體突出顯示的 代碼所示。其他的差異（如類名）可忽略不計(jì)。
' Import namespacesImports SystemImports System.CollectionsImports System.IOModule Module1Sub Main()... ... ...' Pass to QuickSort functionQuickSort(szContents, 0, szContents.Count - 1)... ... ...End Sub' QuickSort implementationSub QuickSort(ByRef szArray As ArrayList, ByVal nLower As Integer, _ByVal nUpper As Integer)' Check for non-base caseIf nLower < nUpper Then' Split and sort partitionsDim nSplit As IntegernSplit = Partition(szArray, nLower, nUpper)QuickSort(szArray, nLower, nSplit - 1)QuickSort(szArray, nSplit + 1, nUpper)End IfEnd Sub' QuickSort partition implementationFunction Partition(ByRef szArray As ArrayList, _ByVal nLower As Integer, ByVal nUpper As Integer) As Integer' Pivot with first elementDim szPivot As StringDim nLeft, nRight As IntegernLeft = nLower + 1szPivot = szArray(nLower)nRight = nUpper' Partition array elementsDim szSwap As StringWhile nLeft <= nRight' Find item out of placeWhile nLeft <= nRightIf szArray(nLeft).CompareTo(szPivot) > 0 Then Exit WhilenLeft = nLeft + 1End WhileWhile nLeft <= nRightIf szArray(nRight).CompareTo(szPivot) <= 0 Then Exit WhilenRight = nRight – 1End While' Swap values if necessaryIf (nLeft < nRight) ThenszSwap = szArray(nLeft)szArray(nLeft) = szArray(nRight)szArray(nRight) = szSwapnLeft = nLeft + 1nRight = nRight – 1End IfEnd While' Move pivot elementszSwap = szArray(nLower)szArray(nLower) = szArray(nRight)szArray(nRight) = szSwapReturn nRightEnd FunctionEnd ModuleQuickSort() 函數(shù)
這個(gè)函數(shù)需要三個(gè)參數(shù)：對數(shù)組的引用、下界和上界。它調(diào)用 Partition() 函數(shù)來將數(shù)組分成兩部分，其中一部分包含 Pivot 值之前的所有字符串，另一部分包含 Pivot 值之后的所有字符串。然后，它調(diào)用自身來對每個(gè)部分進(jìn)行排序。
上面修改中的注釋應(yīng)該說明了每個(gè)代碼塊的作用。唯一的新概念就是 CompareTo() 方法的使用，該方法是 String 類的成員，并且應(yīng)該是自說明的。
運(yùn)行 QuickSort 應(yīng)用程序
這一步完成 QuickSort Visual Basic .NET 示例應(yīng)用程序。現(xiàn)在，可以構(gòu)建項(xiàng)目并運(yùn)行應(yīng)用程序。需要提供一個(gè)示例文本文件，以供其進(jìn)行排序。將該文件放在與 EXE 文件相同的目錄中。
程序輸出
下面是已完成的 QuickSort Visual Basic .NET 示例應(yīng)用程序的輸出。您可以查看示例輸入文件 'example.txt' 和輸出文件 'output.txt'。
步驟 8. 使用調(diào)試器
調(diào)試器是診斷程序問題的一個(gè)必不可少的工具。我們覺得有必要在本入門指南中對其進(jìn)行介紹。這最后一步將向您展示如何走查程序和使用諸如 QuickWatch 這樣的功能。
設(shè)置斷點(diǎn)
當(dāng)程序在調(diào)試器中運(yùn)行時(shí)，斷點(diǎn)會(huì)暫停程序的執(zhí)行，從而使開發(fā)人員能夠控制調(diào)試器。要設(shè)置斷點(diǎn)，請右鍵單擊您想要程序暫停的行，然后單擊 Insert Breakpoint，如下所示。
注：帶有斷點(diǎn)的行以紅色突出顯示。通過再次右鍵單擊該行并選擇 RemoveBreakpoint 可以刪除斷點(diǎn)。
單步調(diào)試程序
既然設(shè)置了斷點(diǎn)（最好是在前面所示的行中），就讓我們在調(diào)試器中運(yùn)行程序。在 Debug 菜單中，選擇 Start 而不是同前面一樣選擇 Start Without Debugging。這樣就在調(diào)試器中啟動(dòng)了程序，并因而激活了斷點(diǎn)。
一旦程序遇到斷點(diǎn)，調(diào)試器便會(huì)接收程序的控制。這時(shí)會(huì)有一個(gè)箭頭指向當(dāng)前執(zhí)行的行。
[Caption]
要單步調(diào)試一行代碼，可以選擇 Debug | Step Over 并觀察光標(biāo)是否移到下一行。Debug | Step Into 命令允許您單步執(zhí)行將要調(diào)用的函數(shù)。進(jìn)行兩次 Step Over 之后的屏幕如下所示。
如果想要程序在遇到下一個(gè)斷點(diǎn)、遇到異?；蛲顺鲋袄^續(xù)執(zhí)行，請從菜單中選擇 Debug | Continue。
檢查變量值
當(dāng)您可以控制調(diào)試器時(shí)，可將鼠標(biāo)指針移到變量上以獲得它的基本值。
您也可以右鍵單擊變量，然后從上下文菜單中選擇 QuickWatch。QuickWatch 將為您提供關(guān)于某些變量（如 ArrayList 對象）的更多詳細(xì)信息。
其他調(diào)試器工具
Visual Studio 調(diào)試器具有許多其他工具（例如 Call Stack 查看器）的功能，可以使用此調(diào)試器來查看到此為止調(diào)用的函數(shù)。還可以獲得內(nèi)存轉(zhuǎn)儲和關(guān)于進(jìn)程中線程的信息。我們鼓勵(lì)您使用這些功能強(qiáng)大的調(diào)試工具。
小結(jié)
本入門指南旨在幫助您用 Visual Studio 構(gòu)建一個(gè)簡單的 Visual Basic 項(xiàng)目。它無法進(jìn)行全面的介紹。我們鼓勵(lì)您查詢關(guān)于 Visual Basic 和 .NET 框架的其他資源，以便更詳細(xì)地學(xué)習(xí)這些技術(shù)。在完成本教程之后，您至少有了一個(gè)可用的項(xiàng)目，在您研究 Visual Basic 時(shí)，可以從修改這些代碼開始。
為了方便起見，我們提供了完整的源代碼和項(xiàng)目文件。您可以通過本文頂部的鏈接獲得它們。
補(bǔ)遺：QuickSort VISUAL BASIC .NET 的源代碼
下面是 QuickSort Visual Basic .NET 示例應(yīng)用程序的完整源代碼。您可以復(fù)制、使用和分發(fā)這些代碼（無版權(quán)費(fèi)）。注意，這些源代碼以"原樣"提供并且不作任何保證。
'' QuickSort Visual Basic .NET Sample Application' Copyright 2001-2002 Microsoft Corporation. All rights reserved.' MSDN ACADEMIC ALLIANCE [http://www.msdn.microsoft.com/academic]' This sample is part of a vast collection of resources we developed for' faculty members in K-12 and higher education. Visit the MSDN Academic Alliance Web site for more!' The source code is provided "as is" without warranty.'' Import namespacesImports SystemImports System.CollectionsImports System.IO' Declare application classModule QuickSortApp' Application initializationSub Main()'Print startup bannerConsole.WriteLine()Console.WriteLine("QuickSort Visual Basic .NET Sample Application")Console.WriteLine("Copyright (c)2001-2002 Microsoft Corporation. All rights reserved.")Console.WriteLine()Console.WriteLine("MSDN ACADEMIC ALLIANCE [http://www.msdn.microsoft.com/academic]")Console.WriteLine()' Describe program functionConsole.WriteLine("This example demonstrates the QuickSort algorithm by reading an input file,")Console.WriteLine("sorting its contents, and writing them to a new file.")Console.WriteLine()' Prompt user for filenamesDim szSrcFile, szDestFile As StringConsole.Write("Source: ")szSrcFile = Console.ReadLine()Console.Write("Output: ")szDestFile = Console.ReadLine()' Read contents of source fileDim szSrcLine As StringDim szContents As ArrayListDim fsInput As FileStreamDim srInput As StreamReaderszContents = New ArrayList()fsInput = New FileStream(szSrcFile, FileMode.Open, FileAccess.Read)srInput = New StreamReader(fsInput)szSrcLine = srInput.ReadLine()While Not IsNothing(szSrcLine)' Append to arrayszContents.Add(szSrcLine)szSrcLine = srInput.ReadLine()End WhilesrInput.Close()fsInput.Close()' Pass to QuickSort functionQuickSort(szContents, 0, szContents.Count - 1)' Write sorted linesDim fsOutput As FileStreamDim srOutput As StreamWriterDim nIndex As IntegerfsOutput = New FileStream(szDestFile, FileMode.Create, FileAccess.Write)srOutput = New StreamWriter(fsOutput)For nIndex = 0 To szContents.Count – 1' Write line to output filesrOutput.WriteLine(szContents(nIndex))Next nIndexsrOutput.Close()fsOutput.Close()' Report program successConsole.WriteLine()Console.WriteLine("The sorted lines have been written to the output file.")Console.WriteLine()Console.WriteLine()End Sub' QuickSort implementationSub QuickSort(ByRef szArray As ArrayList, ByVal nLower As Integer, ByVal nUpper As Integer)' Check for non-base caseIf nLower < nUpper Then' Split and sort partitionsDim nSplit As IntegernSplit = Partition(szArray, nLower, nUpper)QuickSort(szArray, nLower, nSplit - 1)QuickSort(szArray, nSplit + 1, nUpper)End IfEnd Sub' QuickSort partition implementationFunction Partition(ByRef szArray As ArrayList, ByVal nLower As Integer, ByVal nUpper As Integer) As Integer' Pivot with first elementDim szPivot As StringDim nLeft, nRight As IntegernLeft = nLower + 1szPivot = szArray(nLower)nRight = nUpper' Partition array elementsDim szSwap As StringWhile nLeft <= nRight' Find item out of placeWhile nLeft <= nRightIf szArray(nLeft).CompareTo(szPivot) > 0 Then Exit WhilenLeft = nLeft + 1End WhileWhile nLeft <= nRightIf szArray(nRight).CompareTo(szPivot) <= 0 Then Exit WhilenRight = nRight – 1End While' Swap values if necessaryIf (nLeft < nRight) ThenszSwap = szArray(nLeft)szArray(nLeft) = szArray(nRight)szArray(nRight) = szSwapnLeft = nLeft + 1nRight = nRight – 1End IfEnd While' Move pivot elementszSwap = szArray(nLower)szArray(nLower) = szArray(nRight)szArray(nRight) = szSwap Return nRightEnd FunctionEnd Module 補(bǔ)遺：關(guān)于 QuickSort VISUAL BASIC .NET
為了示范 QuickSort Visual Basic .NET 示例應(yīng)用程序?qū)嶋H是如何運(yùn)行的，我們提供了編譯好的可執(zhí)行文件
。您可以通過編譯這些項(xiàng)目文件來創(chuàng)建自己的可執(zhí)行文件。單擊
Quicksort_Visual_Basic_.NET.exe，下載源
代碼項(xiàng)目文件和可執(zhí)行文件包。使用應(yīng)用程序
啟動(dòng) Command Prompt（從 Start 菜單運(yùn)行"cmd.exe"）。使用 CD 命令將目錄更改為可執(zhí)行文件所在的目錄。
然后運(yùn)行"quicksort.exe"。程序?qū)⑻崾灸峁┹斎牒洼敵鑫募拿Q。任何包含多行的文本文件均可使用。如果
需要，可以使用記事本來創(chuàng)建一個(gè)此類文件。然后，該程序?qū)斎胛募膬?nèi)容進(jìn)行排序，并且將其寫入輸出文件。示例程序輸出
下面是來自此 QuickSort Visual Basic .NET 應(yīng)用程序的一個(gè)實(shí)例的輸出。此示例演示了 QuickSort 算法，方法是讀取
輸入文件、對文件的內(nèi)容進(jìn)行排序，然后將其寫入新的文件。用戶輸入的文本以下劃線標(biāo)記。您可以查看下面的示例輸入文件 'example.txt' 和輸出文件 'output.txt'。QuickSort Visual Basic .NET Sample ApplicationCopyright (c)2001-2002 Microsoft Corporation. All rights reserved.MSDN ACADEMIC ALLIANCE [http://www.msdn.microsoft.com/academic]This example demonstrates the QuickSort algorithm by reading an input file,sorting its contents, and writing them to a new file.Source: example.txtOutput: output.txtThe sorted lines have been written to the output file.查看示例輸入文件"example.txt"：Visual C++Windows EmbeddedjavascriptSpeech APIASP.NETVBScriptWindows MediaVisual Basic.NET FrameworkBizTalk ServerXML ParserInternet ExplorerVisual C#SQL ServerWindows XPDirectX API查看示例輸出文件"output.txt"：.NET FrameworkASP.NETBizTalk ServerDirectX APIInternet ExplorerjavascriptSpeech APISQL ServerVBScriptVisual BasicVisual C#Visual C++Windows EmbeddedWindows MediaWindows XPXML Parser
