本文整理汇总了VB.NET中System.Windows.Forms.VisualStyles.VisualStyleElement.ProgressBar.BarVertical类的典型用法代码示例。如果您正苦于以下问题:VB.NET VisualStyleElement.ProgressBar.BarVertical类的具体用法?VB.NET VisualStyleElement.ProgressBar.BarVertical怎么用?VB.NET VisualStyleElement.ProgressBar.BarVertical使用的例子?那么恭喜您, 这里精选的类代码示例或许可以为您提供帮助。
在下文中一共展示了VisualStyleElement.ProgressBar.BarVertical类的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: If
Public Sub DrawVisualStyleElementProgressBarBarVertical1(ByVal e As PaintEventArgs)
If (VisualStyleRenderer.IsElementDefined( _
VisualStyleElement.ProgressBar.BarVertical.Normal)) Then
Dim renderer As New VisualStyleRenderer _
(VisualStyleElement.ProgressBar.BarVertical.Normal)
Dim rectangle1 As New Rectangle(10, 50, 50, 50)
renderer.DrawBackground(e.Graphics, rectangle1)
e.Graphics.DrawString("VisualStyleElement.ProgressBar.BarVertical.Normal", _
Me.Font, Brushes.Black, New Point(10, 10))
Else
e.Graphics.DrawString("This element is not defined in the current visual style.", _
Me.Font, Brushes.Black, New Point(10, 10))
End If
End Sub
开发者ID:VB.NET开发者,项目名称:System.Windows.Forms.VisualStyles,代码行数:14,代码来源:VisualStyleElement.ProgressBar.BarVertical