Color Alpha : Color « 2D Graphics « VB.Net Tutorial

Home
VB.Net Tutorial
1.Language Basics
2.Data Type
3.Operator
4.Statements
5.Date Time
6.Class Module
7.Development
8.Collections
9.Generics
10.Attributes
11.Event
12.LINQ
13.Stream File
14.GUI
15.GUI Applications
16.Windows Presentation Foundation
17.2D Graphics
18.I18N Internationlization
19.Reflection
20.Regular Expressions
21.Security
22.Socket Network
23.Thread
24.Windows
25.XML
26.Database ADO.net
27.Design Patterns
VB.Net
VB.Net by API
VB.Net Tutorial » 2D Graphics » Color 
17.26.8.Color Alpha
Color Alpha
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Windows.Forms

public class TransparentColor
   public Shared Sub Main
        Application.Run(New Form1)
   End Sub
End class

Public Class Form1
    Private Sub Timer1_Tick(ByVal sender As System.Object, _
          ByVal e As System.EventArgsHandles Timer1.Tick
        Me.Refresh()
    End Sub

    Private Sub Form1_Paint(ByVal sender As Object, _
            ByVal e As System.Windows.Forms.PaintEventArgs_
            Handles Me.Paint

        Static currentSetting As Integer = 0
        Static changeFactor As Integer = 1
        Dim transparentGreen As Color
        Dim canvas As Graphics = e.Graphics

        currentSetting += changeFactor
        If (currentSetting = 0Or (currentSetting = 255Then
            changeFactor = -changeFactor
        End If

        transparentGreen = Color.FromArgb(currentSetting, 02550)

        canvas.FillRectangle(New SolidBrush(transparentGreen)5050250100)

    End Sub
End Class


<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing AndAlso components IsNot Nothing Then
            components.Dispose()
        End If
        MyBase.Dispose(disposing)
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container
        Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
        Me.SuspendLayout()
        '
        'Timer1
        '
        Me.Timer1.Enabled = True
        Me.Timer1.Interval = 10
        '
        'Form1
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(491384)
        Me.DoubleBuffered = True
        Me.Name = "Form1"
        Me.Text = "Animating with Transparency"
        Me.ResumeLayout(False)

    End Sub
    Friend WithEvents Timer1 As System.Windows.Forms.Timer

End Class
17.26.Color
17.26.1.KnownColor.ActiveBorder
17.26.2.ColorTranslator.FromHtml('#0000ff')
17.26.3.Color.FromNameColor.FromName
17.26.4.Color.FromArgbColor.FromArgb
17.26.5.Create Color from R G B values
17.26.6.Create Color from R G B value and Alpha
17.26.7.Create Color from SystemColors
17.26.8.Color AlphaColor Alpha
17.26.9.Convert color from string (FF00FF)Convert color from string (FF00FF)
17.26.10.Color.FromWin32Color.FromWin32
17.26.11.Color.FromHtmlColor.FromHtml
17.26.12.Get Color from static fields defined in ColorGet Color from static fields defined in Color
17.26.13.Color.FromArgb(-1090518785)Color.FromArgb(-1090518785)
17.26.14.Get Hue, Saturation, Brightness from a colorGet Hue, Saturation, Brightness from a color
17.26.15.Using different colors in Visual BasicUsing different colors in Visual Basic
17.26.16.Color: Red, Green, Blue, Hue, Saturation, Brightness, SectorColor: Red, Green, Blue, Hue, Saturation, Brightness, Sector
17.26.17.System.Drawing.ColorTranslator.FromOleSystem.Drawing.ColorTranslator.FromOle
17.26.18.Transparent ColorTransparent Color
17.26.19.Alpha blending colorAlpha blending color
www.java2java.com | Contact Us
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.