本文整理匯總了VB.NET中System.Drawing.Drawing2D.ColorBlend.ColorBlend構造函數的典型用法代碼示例。如果您正苦於以下問題:VB.NET ColorBlend構造函數的具體用法?VB.NET ColorBlend怎麽用?VB.NET ColorBlend使用的例子?那麽, 這裏精選的構造函數代碼示例或許可以為您提供幫助。
在下文中一共展示了ColorBlend構造函數的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: OnPaint
Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)
' Draw ellipse using ColorBlend.
Dim startPoint2 As New Point(20, 110)
Dim endPoint2 As New Point(140, 110)
Dim myColors As Color() = {Color.Green, Color.Yellow, _
Color.Yellow, Color.Blue, Color.Red, Color.Red}
Dim myPositions As Single() = {0.0F, 0.2F, 0.4F, 0.6F, 0.8F, 1.0F}
Dim myBlend As New ColorBlend
myBlend.Colors = myColors
myBlend.Positions = myPositions
Dim lgBrush2 As New LinearGradientBrush(startPoint2, endPoint2, _
Color.Green, Color.Red)
lgBrush2.InterpolationColors = myBlend
Dim ellipseRect2 As New Rectangle(20, 110, 120, 80)
e.Graphics.FillEllipse(lgBrush2, ellipseRect2)
End Sub