VBConsoleProgressBar有什么作用

本篇內(nèi)容介紹了“VB ConsoleProgressBar有什么作用”的有關(guān)知識(shí),在實(shí)際案例的操作過程中,不少人都會(huì)遇到這樣的困境,接下來(lái)就讓小編帶領(lǐng)大家學(xué)習(xí)一下如何處理這些情況吧!希望大家仔細(xì)閱讀,能夠?qū)W有所成!

十余年的甘南網(wǎng)站建設(shè)經(jīng)驗(yàn),針對(duì)設(shè)計(jì)、前端、開發(fā)、售后、文案、推廣等六對(duì)一服務(wù),響應(yīng)快,48小時(shí)及時(shí)工作處理。營(yíng)銷型網(wǎng)站的優(yōu)勢(shì)是能夠根據(jù)用戶設(shè)備顯示端的尺寸不同,自動(dòng)調(diào)整甘南建站的顯示方式,使網(wǎng)站能夠適用不同顯示終端,在瀏覽器中調(diào)整網(wǎng)站的寬度,無(wú)論在任何一種瀏覽器上瀏覽網(wǎng)站,都能展現(xiàn)優(yōu)雅布局與設(shè)計(jì),從而大程度地提升瀏覽體驗(yàn)。創(chuàng)新互聯(lián)建站從事“甘南網(wǎng)站設(shè)計(jì)”,“甘南網(wǎng)站推廣”以來(lái),每個(gè)客戶項(xiàng)目都認(rèn)真落實(shí)執(zhí)行。

CopyFiles負(fù)責(zé)取得源目錄下的一個(gè)文件列表,然后把它們復(fù)制到目的目錄下。另外,它還創(chuàng)建了一個(gè)ConsoleProgressBar對(duì)象來(lái)管理進(jìn)度條:

Private Sub CopyFiles(ByVal srcDir As String, ByVal destDir As String)  Const BufferSourceTopLine As Integer = 8 Const BufferDestinationTopLine As Integer = 7 Dim rowIndex As Integer = 7 Dim originalForegroundColor As ConsoleConsoleColor = Console.ForegroundColor  Console.CursorVisible = False Console.Clear()  Dim numberOfFiles As Integer  numberOfFiles = My.Computer.FileSystem.GetFiles(srcDir).Count  Dim PB As New ConsoleProgressBar(numberOfFiles)  DisplayHeader(srcDir, destDir)  Dim fileCounter As Integer = 1 For Each f As String In My.Computer.FileSystem.GetFiles(srcDir)  Dim fi As New System.IO.FileInfo(f)  Console.ForegroundColor = ConsoleColor.Green  Console.SetCursorPosition(0, rowIndex)  Console.Write(fi.Name)  If rowIndex < Console.WindowHeight - 1 Then  rowIndex += 1  Else  Console.MoveBufferArea(0,BufferSourceTopLine, _  Console.WindowWidth, _  Console.WindowHeight - _  BufferSourceTopLine, _  0, _  BufferDestinationTopLine)  End If  My.Computer.FileSystem.CopyFile(fi.FullName, destDir &"\" & fi.Name)  pb.Update( fileCounter)  fileCounter += 1  Next  Console.ForegroundColor = originalForegroundColor Console.SetCursorPosition(0, Console.WindowHeight - 1)  Console.CursorVisible = True End Sub

首先,該代碼保存當(dāng)前的ForegroundColor。然后,它使用另外一種新特征把CursorVisible屬性設(shè)置為False。在清除控制臺(tái)窗口后,它檢索在源目錄下的文件個(gè)數(shù)并且使用這個(gè)數(shù)字作為VB ConsoleProgressBar構(gòu)造器的***值。稍后,我還要討論有關(guān)于 ConsoleProgressBar的細(xì)節(jié)信息。

我調(diào)用DisplayHeader子程序來(lái)把一些有關(guān)復(fù)制操作的信息打印到控制臺(tái)窗口。由于其功能非常類似于DisplayUsage子程序,所以我在此省略對(duì)其細(xì)節(jié)的討論。

我使用了一個(gè)“For...Each”循環(huán)來(lái)遍歷在源目錄下的所有文件,并使用了一個(gè)rowIndex變量來(lái)跟蹤要把文件名打印到控制臺(tái)的哪一行。隨著循環(huán)的不斷執(zhí)行,rowIndex每次增加1,直到到達(dá)控制臺(tái)窗口的底部為止。一旦到達(dá)控制臺(tái)窗口的底部,我利用另外一個(gè)新控制臺(tái)應(yīng)用程序特征— MoveBufferArea方法(下一節(jié)討論)。

在更新顯示和復(fù)制文件后,我通過調(diào)用VB ConsoleProgressBar類的Update方法來(lái)更新進(jìn)度條。

一旦循環(huán)結(jié)束并且文件復(fù)制結(jié)束,我再把ForegroundColor設(shè)置回其原來(lái)的顏色,并且把光標(biāo)位置設(shè)置到控制臺(tái)窗口的最下面一行,并且使之再次可見。

“VB ConsoleProgressBar有什么作用”的內(nèi)容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識(shí)可以關(guān)注創(chuàng)新互聯(lián)網(wǎng)站,小編將為大家輸出更多高質(zhì)量的實(shí)用文章!

名稱欄目:VBConsoleProgressBar有什么作用
鏈接地址:http://bm7419.com/article18/goepgp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供搜索引擎優(yōu)化企業(yè)建站、虛擬主機(jī)、云服務(wù)器軟件開發(fā)、

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)

成都app開發(fā)公司