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对话框