VB.NET Graphics.DrawPie方法代码示例

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› VB.NET›VB.NET教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

本文整理汇总了VB.NET中System.Drawing.Graphics.DrawPie方法的典型用法代码示例。如果您正苦于以下问题：VB.NET Graphics.DrawPie方法的具体用法？VB.NET Graphics.DrawPie怎么用？VB.NET Graphics.DrawPie使用的例子？那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。您也可以进一步了解该方法所在类System.Drawing.Graphics的用法示例。

在下文中一共展示了Graphics.DrawPie方法的4个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于我们的系统推荐出更棒的VB.NET代码示例。

示例1: DrawPieFloat

Public Sub DrawPieFloat(ByVal e As PaintEventArgs)

    ' Create pen.
    Dim blackPen As New Pen(Color.Black, 3)

    ' Create location and size of ellipse.
    Dim x As Single = 0.0F
    Dim y As Single = 0.0F
    Dim width As Single = 200.0F
    Dim height As Single = 100.0F

    ' Create start and sweep angles.
    Dim startAngle As Single = 0.0F
    Dim sweepAngle As Single = 45.0F

    ' Draw pie to screen.
    e.Graphics.DrawPie(blackPen, x, y, width, height, _
    startAngle, sweepAngle)
End Sub

开发者ID:VB.NET开发者，项目名称:System.Drawing，代码行数:19，代码来源:Graphics.DrawPie

示例2: DrawPieRectangle

Public Sub DrawPieRectangle(ByVal e As PaintEventArgs)

    ' Create pen.
    Dim blackPen As New Pen(Color.Black, 3)

    ' Create rectangle for ellipse.
    Dim rect As New Rectangle(0, 0, 200, 100)

    ' Create start and sweep angles.
    Dim startAngle As Single = 0.0F
    Dim sweepAngle As Single = 45.0F

    ' Draw pie to screen.
    e.Graphics.DrawPie(blackPen, rect, startAngle, sweepAngle)
End Sub

开发者ID:VB.NET开发者，项目名称:System.Drawing，代码行数:15，代码来源:Graphics.DrawPie

示例3: DrawPieRectangleF

Public Sub DrawPieRectangleF(ByVal e As PaintEventArgs)

    ' Create pen.
    Dim blackPen As New Pen(Color.Black, 3)

    ' Create rectangle for ellipse.
    Dim rect As New RectangleF(0.0F, 0.0F, 200.0F, 100.0F)

    ' Create start and sweep angles.
    Dim startAngle As Single = 0.0F
    Dim sweepAngle As Single = 45.0F

    ' Draw pie to screen.
    e.Graphics.DrawPie(blackPen, rect, startAngle, sweepAngle)
End Sub

开发者ID:VB.NET开发者，项目名称:System.Drawing，代码行数:15，代码来源:Graphics.DrawPie

示例4: DrawPieInt

Public Sub DrawPieInt(ByVal e As PaintEventArgs)

    ' Create pen.
    Dim blackPen As New Pen(Color.Black, 3)

    ' Create location and size of ellipse.
    Dim x As Integer = 0
    Dim y As Integer = 0
    Dim width As Integer = 200
    Dim height As Integer = 100

    ' Create start and sweep angles.
    Dim startAngle As Integer = 0
    Dim sweepAngle As Integer = 45

    ' Draw pie to screen.
    e.Graphics.DrawPie(blackPen, x, y, width, height, _
    startAngle, sweepAngle)
End Sub

开发者ID:VB.NET开发者，项目名称:System.Drawing，代码行数:19，代码来源:Graphics.DrawPie

注：本文中的System.Drawing.Graphics.DrawPie方法示例整理自Github/MSDocs等源码及文档管理平台，相关代码片段筛选自各路编程大神贡献的开源项目，源码版权归原作者所有，传播和使用请参考对应项目的License；未经允许，请勿转载。