VB.Net - 进度条控件
-
简述
它代表一个 Windows 进度条控件。它用于向您的用户提供有关某些任务状态的视觉反馈。它显示一个条,随着操作的进行从左到右填充。让我们单击工具箱中的 ProgressBar 控件并将其放置在窗体上。进度条的主要属性是Value、Maximum和Minimum。最小值和最大值属性用于设置进度条可以显示的最小值和最大值。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获取或设置控件范围的最大值.v10 Minimum获取或设置控件范围的最小值。11 Padding获取或设置 ProgressBar 控件的边缘与其内容之间的空间。12 RightToLeftLayout获取或设置一个值,该值指示 ProgressBar 及其包含的任何文本是否从右到左显示。13 Step获取或设置对 PerformStep 方法的调用增加进度条当前位置的量。14 Style获取或设置在进度条上指示进度的方式。15 Value获取或设置进度条的当前位置.v -
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 属性更改时发生。18 TabStopChanged在 TabStop 属性更改时发生。19 TextChanged当 Text 属性更改时发生。 -
例子
在这个例子中,让我们在运行时创建一个进度条。让我们双击窗体并将以下代码放入打开的窗口中。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 = "jc2182.com" End Sub End Class
当上面的代码被执行并运行时使用 Start Microsoft Visual Studio 工具栏上可用的按钮,它将显示以下窗口 -