VB.Net進度條(ProgressBar)

進度條(ProgressBar)代表一個Windows進度條控件。它用於向用戶提供關於某個任務狀態的視覺回饋。它顯示了一個進度條,隨著操作的進行從左到右填充。

從工具箱中點擊一個ProgressBar控件,並把它放在窗體上。

進度條的主要屬性是值:MaximumMinimumMaximumMinimum屬性用於設置進度欄可以顯示的最小值和最大值。Value屬性指定進度條的當前位置。

當應用程式執行複製檔或列印文檔等任務時,通常使用ProgressBar控件。 對於用戶來說,如果沒有視覺提示,應用程式可能看起來沒有回應。在這種情況下,使用ProgressBar允許程式員提供進度的可視狀態。

ProgressBar控件的屬性

以下是ProgressBar控件的一些常用屬性:

編號 屬性 描述
1 AllowDrop 重寫Control.AllowDrop
2 BackgroundImage 獲取或設置ProgressBar控件的背景圖像。
3 BackgroundImageLayout 獲取或設置進度條的背景圖片的佈局。
4 CausesValidation 獲取或設置一個值,該值指示控件何時接收焦點會導致驗證在需要驗證的任何控件上執行。
5 Font 獲取或設置ProgressBar中的文本字體。
6 ImeMode 獲取或設置ProgressBar的輸入法編輯器(IME)。
7 ImeModeBase 獲取或設置控件的IME模式。
8 MarqueeAnimationSpeed 獲取或設置進度塊在進度條上滾動的時間段(以毫秒為單位)。
9 Maximum 獲取或設置控件範圍的最大值。
10 Minimum 獲取或設置控件範圍的最小值。
11 Padding 獲取或設置ProgressBar控件的邊緣與其內容之間的空格。
12 RightToLeftLayout 獲取或設置一個值,該值指示ProgressBar及其包含的任何文本是否從右向左顯示。
13 Step 獲取或設置對PerformStep方法的調用增加進度欄的當前位置的數量。
14 Style 獲取或設置應該在進度條上顯示進度的方式。
15 Value 獲取或設置進度條的當前位置。

ProgressBar控件的方法

以下是ProgressBar控件的一些常用方法:

編號 方法 描述
1 Increment 按指定的數量增加ProgressBar控件的當前位置。
2 PerformStep 按指定的步驟增加值。
3 ResetText Text屬性重置為其默認值。
4 ToString 返回一個表示進度條控件的字串。

ProgressBar控件的事件

以下是ProgressBar控件的一些常用事件:

編號 事件 描述
1 BackgroundImageChanged BackgroundImage屬性的值更改時發生。
2 BackgroundImageLayoutChanged BackgroundImageLayout屬性的值更改時發生。
3 CausesValidationChanged CausesValidation屬性的值更改時發生。
4 Click 在單擊控件時發生。
5 DoubleClick 在用戶雙擊控件時發生。
6 Enter 在焦點進入控件時發生。
7 FontChanged Font屬性的值更改時發生。
8 ImeModeChanged ImeMode屬性的值更改時發生。
9 KeyDown 在控件具有焦點時用戶按下某個鍵時發生。
10 KeyPress 在控件具有焦點時用戶按下某個鍵時發生。
11 KeyUp 在控件具有焦點時用戶釋放鍵時發生。
12 Leave 在焦點離開ProgressBar控件時發生。
13 MouseClick 在滑鼠單擊控件時發生。
14 MouseDoubleClick 在用戶雙擊控件時發生。
15 PaddingChanged Padding屬性的值更改時發生。
16 Paint 在繪製ProgressBar時發生。
17 RightToLeftLayoutChanged RightToLeftLayout屬性更改時發生。
19 TabStopChanged TabStop屬性更改時發生。
20 TextChanged Text屬性更改時發生。

示例

在這個例子中,在運行時創建一個進度條。雙擊表單並將下麵的代碼放在打開的窗口中。

Imports System.Windows.Forms.ProgressBar
Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'create two progress bars '
        'Dim ProgressBar1 As ProgressBar
        'Dim ProgressBar2 As ProgressBar
        'ProgressBar1 = New ProgressBar()
        ' ProgressBar2 = New ProgressBar()
        'set position
        ProgressBar1.Location = New Point(10, 10)
        ProgressBar2.Location = New Point(10, 50)
        'set values
        ProgressBar1.Minimum = 0
        ProgressBar1.Maximum = 200
        ProgressBar1.Value = 130
        ProgressBar2.Minimum = 0
        ProgressBar2.Maximum = 100
        ProgressBar2.Value = 40
        'add the progress bar to the form '
        Me.Controls.Add(ProgressBar1)
        Me.Controls.Add(ProgressBar2)
        ' Set the caption bar text of the form.  '
        Me.Text = "ProgressBar示例 - xuhuhu.com"
    End Sub
End Class

當上面的代碼執行並使用Microsoft Visual Studio工具欄上的“開始”按鈕運行時,它將顯示以下窗口:


上一篇: VB.Net基本控件 下一篇: VB.Net對話框