VB .NET如何在計算過程中加入進度條？

VB.Net中提供了ProgressBar控件，用于顯示進度條

創(chuàng)新互聯(lián)堅持“要么做到，要么別承諾”的工作理念，服務(wù)領(lǐng)域包括：網(wǎng)站建設(shè)、網(wǎng)站設(shè)計、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣等服務(wù)，滿足客戶于互聯(lián)網(wǎng)時代的讓胡路網(wǎng)站設(shè)計、移動媒體設(shè)計的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴！

我建議你不要用進度條顯示剩余時間而是顯示執(zhí)行進度

這樣比較好控制

設(shè)置ProgressBar的Minimum和Maximum屬性為循環(huán)的起始和終止數(shù)值

然后在代碼的循環(huán)體中計算當(dāng)前循環(huán)的進度，然后設(shè)置進度條的Value屬性，

將進度顯示在進度條上

比如,簡單的例子:

Dim Progress As Integer

ProgressBar1.Minimum = Min

ProgressBar1.Maximum = Max

For i As Integer = Min To Max

'執(zhí)行計算.......

Progress = i \ Max '計算進度

ProgressBar1.Value = Progress '顯示進度

My.Application.DoEvents() '使用Doevents防止窗體假死使進度條看不到，但是會嚴(yán)重降低運行速度

Next

這里的優(yōu)化技巧是，可以設(shè)置為每隔N次循環(huán)才更新進度條

If Not Progress Mod N Then ProgressBar1.Value = Progress

不然進度條的更新也許比計算的速度還要慢很多

關(guān)于VB.NET進度條的實例

該實例有很多實現(xiàn)方法,下面介紹一種不同的給你:

首先要在窗體中載入以下控件:progressbar(進度條),label(用來實時顯示文本提示),兩個timer(分別控制進度條進度的增減),然后用以下代碼就能實現(xiàn):

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Timer1.Enabled = True

Timer1.Interval = 500

Timer2.Interval = 500

ProgressBar1.Value = 0

ProgressBar1.Maximum = 100

ProgressBar1.Minimum = 0

End Sub

'上述過程是設(shè)置控件的初始值,也可以在屬性面板設(shè)置

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

ProgressBar1.Value += 1

Label1.Text = "當(dāng)前完成" ProgressBar1.Value "%"

If (ProgressBar1.Value = 100) Then

Timer1.Enabled = False

Timer2.Enabled = True

End If

End Sub

'timer1用來控制進度的增加

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick

ProgressBar1.Value -= 1

Label1.Text = "當(dāng)前完成" ProgressBar1.Value "%"

If (ProgressBar1.Value = 0) Then

Timer1.Enabled = True

Timer2.Enabled = False

End If

End Sub

'time2用來控制進度的減少

End Class

關(guān)于VB.NET中進度條使用問題

VB.Net中提供了ProgressBar控件，用于顯示進度條

設(shè)置ProgressBar的Minimum和Maximum屬性為循環(huán)的起始和終止數(shù)值

然后在代碼的循環(huán)體中計算當(dāng)前循環(huán)的進度，然后設(shè)置進度條的Value屬性，

將進度顯示在進度條上

vb.net 進度條（ProgressBar）和 Timer 控件怎么用？

這個不象是怎么傳遞Pr值的問題吧，是不是讀取過程中卡??？

在pr=J 下面加一句My.Application.DoEvents() ，暫時釋放一下控制權(quán)，使程序去處理完其它事件。再說不需要時間控件，直接在循環(huán)過程中修改進度值也可以，然后來一句My.Application.DoEvents()。

當(dāng)前標(biāo)題：包含vb.net半圓進度條的詞條
網(wǎng)站路徑：http://jinyejixie.com/article4/docpsoe.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站內(nèi)鏈、做網(wǎng)站、定制網(wǎng)站、網(wǎng)站制作、虛擬主機、小程序開發(fā)

廣告

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