Click here to Skip to main content
15,891,943 members
Articles / Programming Languages / Visual Basic

Visually alter colormatrix with 25 slidebars, application included

Rate me:
Please Sign up or sign in to vote.
2.42/5 (11 votes)
29 Jan 20072 min read 33.9K   1.2K   19  
Learn colormatrix inside and out, demo displays color matrix built after manipulation 25 slidebars
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class XtremePhoto
    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.TrackBar0 = New System.Windows.Forms.TrackBar
        Me.TrackBar1 = New System.Windows.Forms.TrackBar
        Me.TrackBar2 = New System.Windows.Forms.TrackBar
        Me.TrackBar3 = New System.Windows.Forms.TrackBar
        Me.TrackBar4 = New System.Windows.Forms.TrackBar
        Me.TrackBar5 = New System.Windows.Forms.TrackBar
        Me.TrackBar6 = New System.Windows.Forms.TrackBar
        Me.TrackBar7 = New System.Windows.Forms.TrackBar
        Me.TrackBar8 = New System.Windows.Forms.TrackBar
        Me.TrackBar9 = New System.Windows.Forms.TrackBar
        Me.TrackBar10 = New System.Windows.Forms.TrackBar
        Me.TrackBar11 = New System.Windows.Forms.TrackBar
        Me.TrackBar12 = New System.Windows.Forms.TrackBar
        Me.TrackBar13 = New System.Windows.Forms.TrackBar
        Me.TrackBar14 = New System.Windows.Forms.TrackBar
        Me.TrackBar15 = New System.Windows.Forms.TrackBar
        Me.TrackBar16 = New System.Windows.Forms.TrackBar
        Me.TrackBar17 = New System.Windows.Forms.TrackBar
        Me.TrackBar18 = New System.Windows.Forms.TrackBar
        Me.TrackBar19 = New System.Windows.Forms.TrackBar
        Me.TrackBar20 = New System.Windows.Forms.TrackBar
        Me.TrackBar21 = New System.Windows.Forms.TrackBar
        Me.TrackBar22 = New System.Windows.Forms.TrackBar
        Me.TrackBar23 = New System.Windows.Forms.TrackBar
        Me.TrackBar24 = New System.Windows.Forms.TrackBar
        Me.Label1 = New System.Windows.Forms.Label
        Me.Label2 = New System.Windows.Forms.Label
        Me.Label3 = New System.Windows.Forms.Label
        Me.Label4 = New System.Windows.Forms.Label
        Me.Label5 = New System.Windows.Forms.Label
        Me.PictureBox1 = New System.Windows.Forms.PictureBox
        Me.PictureBox2 = New System.Windows.Forms.PictureBox
        Me.PictureBox3 = New System.Windows.Forms.PictureBox
        Me.Label7 = New System.Windows.Forms.Label
        Me.ApplySettings = New System.Windows.Forms.Button
        Me.Button2 = New System.Windows.Forms.Button
        Me.ShowCM = New System.Windows.Forms.TextBox
        Me.Label9 = New System.Windows.Forms.Label
        Me.GetMage = New System.Windows.Forms.Button
        Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog
        Me.Label8 = New System.Windows.Forms.Label
        Me.Label10 = New System.Windows.Forms.Label
        Me.Label11 = New System.Windows.Forms.Label
        Me.Label12 = New System.Windows.Forms.Label
        Me.Label13 = New System.Windows.Forms.Label
        Me.Label14 = New System.Windows.Forms.Label
        Me.Label15 = New System.Windows.Forms.Label
        Me.GetForeImage = New System.Windows.Forms.Button
        Me.GrayScale = New System.Windows.Forms.Button
        Me.DoGamma = New System.Windows.Forms.Button
        Me.DoThreshold = New System.Windows.Forms.Button
        Me.Threshold = New System.Windows.Forms.TrackBar
        Me.Gamma = New System.Windows.Forms.TrackBar
        Me.SavePic = New System.Windows.Forms.Button
        Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog
        CType(Me.TrackBar0, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar4, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar5, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar6, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar7, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar8, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar9, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar10, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar11, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar12, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar13, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar14, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar15, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar16, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar17, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar18, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar19, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar20, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar21, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar22, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar23, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TrackBar24, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.Threshold, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.Gamma, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'TrackBar0
        '
        Me.TrackBar0.Location = New System.Drawing.Point(33, 36)
        Me.TrackBar0.Maximum = 100
        Me.TrackBar0.Name = "TrackBar0"
        Me.TrackBar0.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar0.TabIndex = 0
        Me.TrackBar0.Value = 100
        '
        'TrackBar1
        '
        Me.TrackBar1.Location = New System.Drawing.Point(172, 36)
        Me.TrackBar1.Maximum = 100
        Me.TrackBar1.Name = "TrackBar1"
        Me.TrackBar1.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar1.TabIndex = 1
        Me.TrackBar1.Value = 100
        '
        'TrackBar2
        '
        Me.TrackBar2.Location = New System.Drawing.Point(318, 36)
        Me.TrackBar2.Maximum = 100
        Me.TrackBar2.Name = "TrackBar2"
        Me.TrackBar2.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar2.TabIndex = 2
        Me.TrackBar2.Value = 100
        '
        'TrackBar3
        '
        Me.TrackBar3.Location = New System.Drawing.Point(460, 36)
        Me.TrackBar3.Maximum = 100
        Me.TrackBar3.Name = "TrackBar3"
        Me.TrackBar3.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar3.TabIndex = 3
        Me.TrackBar3.Value = 100
        '
        'TrackBar4
        '
        Me.TrackBar4.Location = New System.Drawing.Point(605, 36)
        Me.TrackBar4.Maximum = 100
        Me.TrackBar4.Name = "TrackBar4"
        Me.TrackBar4.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar4.TabIndex = 4
        Me.TrackBar4.Value = 100
        '
        'TrackBar5
        '
        Me.TrackBar5.Location = New System.Drawing.Point(33, 70)
        Me.TrackBar5.Maximum = 100
        Me.TrackBar5.Name = "TrackBar5"
        Me.TrackBar5.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar5.TabIndex = 9
        Me.TrackBar5.Value = 100
        '
        'TrackBar6
        '
        Me.TrackBar6.Location = New System.Drawing.Point(172, 70)
        Me.TrackBar6.Maximum = 100
        Me.TrackBar6.Name = "TrackBar6"
        Me.TrackBar6.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar6.TabIndex = 8
        Me.TrackBar6.Value = 100
        '
        'TrackBar7
        '
        Me.TrackBar7.Location = New System.Drawing.Point(318, 70)
        Me.TrackBar7.Maximum = 100
        Me.TrackBar7.Name = "TrackBar7"
        Me.TrackBar7.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar7.TabIndex = 7
        Me.TrackBar7.Value = 100
        '
        'TrackBar8
        '
        Me.TrackBar8.Location = New System.Drawing.Point(460, 70)
        Me.TrackBar8.Maximum = 100
        Me.TrackBar8.Name = "TrackBar8"
        Me.TrackBar8.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar8.TabIndex = 6
        Me.TrackBar8.Value = 100
        '
        'TrackBar9
        '
        Me.TrackBar9.Location = New System.Drawing.Point(605, 70)
        Me.TrackBar9.Maximum = 100
        Me.TrackBar9.Name = "TrackBar9"
        Me.TrackBar9.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar9.TabIndex = 5
        Me.TrackBar9.Value = 100
        '
        'TrackBar10
        '
        Me.TrackBar10.Location = New System.Drawing.Point(33, 105)
        Me.TrackBar10.Maximum = 100
        Me.TrackBar10.Name = "TrackBar10"
        Me.TrackBar10.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar10.TabIndex = 14
        Me.TrackBar10.Value = 100
        '
        'TrackBar11
        '
        Me.TrackBar11.Location = New System.Drawing.Point(172, 105)
        Me.TrackBar11.Maximum = 100
        Me.TrackBar11.Name = "TrackBar11"
        Me.TrackBar11.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar11.TabIndex = 13
        Me.TrackBar11.Value = 100
        '
        'TrackBar12
        '
        Me.TrackBar12.Location = New System.Drawing.Point(319, 105)
        Me.TrackBar12.Maximum = 100
        Me.TrackBar12.Name = "TrackBar12"
        Me.TrackBar12.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar12.TabIndex = 12
        Me.TrackBar12.Value = 100
        '
        'TrackBar13
        '
        Me.TrackBar13.Location = New System.Drawing.Point(460, 105)
        Me.TrackBar13.Maximum = 100
        Me.TrackBar13.Name = "TrackBar13"
        Me.TrackBar13.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar13.TabIndex = 11
        Me.TrackBar13.Value = 100
        '
        'TrackBar14
        '
        Me.TrackBar14.Location = New System.Drawing.Point(605, 105)
        Me.TrackBar14.Maximum = 100
        Me.TrackBar14.Name = "TrackBar14"
        Me.TrackBar14.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar14.TabIndex = 10
        Me.TrackBar14.Value = 100
        '
        'TrackBar15
        '
        Me.TrackBar15.Location = New System.Drawing.Point(33, 139)
        Me.TrackBar15.Maximum = 100
        Me.TrackBar15.Name = "TrackBar15"
        Me.TrackBar15.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar15.TabIndex = 19
        Me.TrackBar15.Value = 100
        '
        'TrackBar16
        '
        Me.TrackBar16.Location = New System.Drawing.Point(172, 139)
        Me.TrackBar16.Maximum = 100
        Me.TrackBar16.Name = "TrackBar16"
        Me.TrackBar16.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar16.TabIndex = 18
        Me.TrackBar16.Value = 100
        '
        'TrackBar17
        '
        Me.TrackBar17.Location = New System.Drawing.Point(318, 139)
        Me.TrackBar17.Maximum = 100
        Me.TrackBar17.Name = "TrackBar17"
        Me.TrackBar17.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar17.TabIndex = 17
        Me.TrackBar17.Value = 100
        '
        'TrackBar18
        '
        Me.TrackBar18.Location = New System.Drawing.Point(460, 139)
        Me.TrackBar18.Maximum = 100
        Me.TrackBar18.Name = "TrackBar18"
        Me.TrackBar18.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar18.TabIndex = 16
        Me.TrackBar18.Value = 100
        '
        'TrackBar19
        '
        Me.TrackBar19.Location = New System.Drawing.Point(605, 139)
        Me.TrackBar19.Maximum = 100
        Me.TrackBar19.Name = "TrackBar19"
        Me.TrackBar19.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar19.TabIndex = 15
        Me.TrackBar19.Value = 100
        '
        'TrackBar20
        '
        Me.TrackBar20.Location = New System.Drawing.Point(33, 173)
        Me.TrackBar20.Maximum = 100
        Me.TrackBar20.Name = "TrackBar20"
        Me.TrackBar20.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar20.TabIndex = 24
        Me.TrackBar20.Value = 100
        '
        'TrackBar21
        '
        Me.TrackBar21.Location = New System.Drawing.Point(172, 173)
        Me.TrackBar21.Maximum = 100
        Me.TrackBar21.Name = "TrackBar21"
        Me.TrackBar21.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar21.TabIndex = 23
        Me.TrackBar21.Value = 100
        '
        'TrackBar22
        '
        Me.TrackBar22.Location = New System.Drawing.Point(318, 170)
        Me.TrackBar22.Maximum = 100
        Me.TrackBar22.Name = "TrackBar22"
        Me.TrackBar22.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar22.TabIndex = 22
        Me.TrackBar22.Value = 100
        '
        'TrackBar23
        '
        Me.TrackBar23.Location = New System.Drawing.Point(460, 173)
        Me.TrackBar23.Maximum = 100
        Me.TrackBar23.Name = "TrackBar23"
        Me.TrackBar23.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar23.TabIndex = 21
        Me.TrackBar23.Value = 100
        '
        'TrackBar24
        '
        Me.TrackBar24.Location = New System.Drawing.Point(605, 170)
        Me.TrackBar24.Maximum = 100
        Me.TrackBar24.Name = "TrackBar24"
        Me.TrackBar24.Size = New System.Drawing.Size(151, 45)
        Me.TrackBar24.TabIndex = 20
        Me.TrackBar24.Value = 100
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label1.ForeColor = System.Drawing.Color.Red
        Me.Label1.Location = New System.Drawing.Point(1, 36)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(30, 13)
        Me.Label1.TabIndex = 25
        Me.Label1.Text = "Red"
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label2.ForeColor = System.Drawing.Color.Green
        Me.Label2.Location = New System.Drawing.Point(1, 70)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(41, 13)
        Me.Label2.TabIndex = 26
        Me.Label2.Text = "Green"
        '
        'Label3
        '
        Me.Label3.AutoSize = True
        Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label3.ForeColor = System.Drawing.Color.Blue
        Me.Label3.Location = New System.Drawing.Point(1, 105)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(32, 13)
        Me.Label3.TabIndex = 27
        Me.Label3.Text = "Blue"
        '
        'Label4
        '
        Me.Label4.AutoSize = True
        Me.Label4.Location = New System.Drawing.Point(30, 11)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(22, 13)
        Me.Label4.TabIndex = 28
        Me.Label4.Text = "0,0"
        '
        'Label5
        '
        Me.Label5.AutoSize = True
        Me.Label5.Location = New System.Drawing.Point(721, 219)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(22, 13)
        Me.Label5.TabIndex = 29
        Me.Label5.Text = "4,4"
        '
        'PictureBox1
        '
        Me.PictureBox1.Location = New System.Drawing.Point(12, 237)
        Me.PictureBox1.Name = "PictureBox1"
        Me.PictureBox1.Size = New System.Drawing.Size(234, 204)
        Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
        Me.PictureBox1.TabIndex = 30
        Me.PictureBox1.TabStop = False
        '
        'PictureBox2
        '
        Me.PictureBox2.Location = New System.Drawing.Point(260, 237)
        Me.PictureBox2.Name = "PictureBox2"
        Me.PictureBox2.Size = New System.Drawing.Size(234, 204)
        Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
        Me.PictureBox2.TabIndex = 31
        Me.PictureBox2.TabStop = False
        '
        'PictureBox3
        '
        Me.PictureBox3.Location = New System.Drawing.Point(509, 237)
        Me.PictureBox3.Name = "PictureBox3"
        Me.PictureBox3.Size = New System.Drawing.Size(234, 204)
        Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
        Me.PictureBox3.TabIndex = 32
        Me.PictureBox3.TabStop = False
        '
        'Label7
        '
        Me.Label7.AutoSize = True
        Me.Label7.Location = New System.Drawing.Point(257, 221)
        Me.Label7.Name = "Label7"
        Me.Label7.Size = New System.Drawing.Size(72, 13)
        Me.Label7.TabIndex = 34
        Me.Label7.Text = "Altered Image"
        '
        'ApplySettings
        '
        Me.ApplySettings.Location = New System.Drawing.Point(633, 4)
        Me.ApplySettings.Name = "ApplySettings"
        Me.ApplySettings.Size = New System.Drawing.Size(98, 26)
        Me.ApplySettings.TabIndex = 36
        Me.ApplySettings.Text = "Apply Settings"
        Me.ApplySettings.UseVisualStyleBackColor = True
        '
        'Button2
        '
        Me.Button2.Location = New System.Drawing.Point(529, 4)
        Me.Button2.Name = "Button2"
        Me.Button2.Size = New System.Drawing.Size(98, 26)
        Me.Button2.TabIndex = 37
        Me.Button2.Text = "Reset Settings"
        Me.Button2.UseVisualStyleBackColor = True
        '
        'ShowCM
        '
        Me.ShowCM.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.ShowCM.Location = New System.Drawing.Point(13, 458)
        Me.ShowCM.Multiline = True
        Me.ShowCM.Name = "ShowCM"
        Me.ShowCM.Size = New System.Drawing.Size(143, 95)
        Me.ShowCM.TabIndex = 38
        '
        'Label9
        '
        Me.Label9.AutoSize = True
        Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label9.ForeColor = System.Drawing.Color.Blue
        Me.Label9.Location = New System.Drawing.Point(12, 442)
        Me.Label9.Name = "Label9"
        Me.Label9.Size = New System.Drawing.Size(103, 13)
        Me.Label9.TabIndex = 39
        Me.Label9.Text = "Color Matrix 0-24"
        '
        'GetMage
        '
        Me.GetMage.Location = New System.Drawing.Point(509, 211)
        Me.GetMage.Name = "GetMage"
        Me.GetMage.Size = New System.Drawing.Size(130, 23)
        Me.GetMage.TabIndex = 40
        Me.GetMage.Text = "BackGround Image"
        Me.GetMage.UseVisualStyleBackColor = True
        '
        'OpenFileDialog1
        '
        Me.OpenFileDialog1.FileName = "OpenFileDialog1"
        '
        'Label8
        '
        Me.Label8.AutoSize = True
        Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label8.ForeColor = System.Drawing.Color.Black
        Me.Label8.Location = New System.Drawing.Point(1, 139)
        Me.Label8.Name = "Label8"
        Me.Label8.Size = New System.Drawing.Size(39, 13)
        Me.Label8.TabIndex = 41
        Me.Label8.Text = "Alpha"
        '
        'Label10
        '
        Me.Label10.AutoSize = True
        Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label10.ForeColor = System.Drawing.Color.Black
        Me.Label10.Location = New System.Drawing.Point(1, 173)
        Me.Label10.Name = "Label10"
        Me.Label10.Size = New System.Drawing.Size(35, 13)
        Me.Label10.TabIndex = 42
        Me.Label10.Text = "Base"
        '
        'Label11
        '
        Me.Label11.AutoSize = True
        Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label11.ForeColor = System.Drawing.Color.Red
        Me.Label11.Location = New System.Drawing.Point(85, 20)
        Me.Label11.Name = "Label11"
        Me.Label11.Size = New System.Drawing.Size(30, 13)
        Me.Label11.TabIndex = 43
        Me.Label11.Text = "Red"
        '
        'Label12
        '
        Me.Label12.AutoSize = True
        Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label12.ForeColor = System.Drawing.Color.Green
        Me.Label12.Location = New System.Drawing.Point(223, 68)
        Me.Label12.Name = "Label12"
        Me.Label12.Size = New System.Drawing.Size(41, 13)
        Me.Label12.TabIndex = 44
        Me.Label12.Text = "Green"
        '
        'Label13
        '
        Me.Label13.AutoSize = True
        Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label13.ForeColor = System.Drawing.Color.Blue
        Me.Label13.Location = New System.Drawing.Point(373, 102)
        Me.Label13.Name = "Label13"
        Me.Label13.Size = New System.Drawing.Size(32, 13)
        Me.Label13.TabIndex = 45
        Me.Label13.Text = "Blue"
        '
        'Label14
        '
        Me.Label14.AutoSize = True
        Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label14.ForeColor = System.Drawing.Color.Black
        Me.Label14.Location = New System.Drawing.Point(506, 137)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(39, 13)
        Me.Label14.TabIndex = 46
        Me.Label14.Text = "Alpha"
        '
        'Label15
        '
        Me.Label15.AutoSize = True
        Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label15.ForeColor = System.Drawing.Color.Black
        Me.Label15.Location = New System.Drawing.Point(655, 170)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(35, 13)
        Me.Label15.TabIndex = 47
        Me.Label15.Text = "Base"
        '
        'GetForeImage
        '
        Me.GetForeImage.Location = New System.Drawing.Point(15, 216)
        Me.GetForeImage.Name = "GetForeImage"
        Me.GetForeImage.Size = New System.Drawing.Size(134, 23)
        Me.GetForeImage.TabIndex = 48
        Me.GetForeImage.Text = "ForeGround Image"
        Me.GetForeImage.UseVisualStyleBackColor = True
        '
        'GrayScale
        '
        Me.GrayScale.Location = New System.Drawing.Point(162, 462)
        Me.GrayScale.Name = "GrayScale"
        Me.GrayScale.Size = New System.Drawing.Size(92, 26)
        Me.GrayScale.TabIndex = 49
        Me.GrayScale.Text = "GrayScale"
        Me.GrayScale.UseVisualStyleBackColor = True
        '
        'DoGamma
        '
        Me.DoGamma.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.DoGamma.Location = New System.Drawing.Point(260, 498)
        Me.DoGamma.Name = "DoGamma"
        Me.DoGamma.Size = New System.Drawing.Size(91, 26)
        Me.DoGamma.TabIndex = 377
        Me.DoGamma.Text = "Reset Gamma"
        Me.DoGamma.UseVisualStyleBackColor = True
        '
        'DoThreshold
        '
        Me.DoThreshold.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.DoThreshold.Location = New System.Drawing.Point(260, 463)
        Me.DoThreshold.Name = "DoThreshold"
        Me.DoThreshold.Size = New System.Drawing.Size(91, 26)
        Me.DoThreshold.TabIndex = 379
        Me.DoThreshold.Text = "Reset Threshold"
        Me.DoThreshold.UseVisualStyleBackColor = True
        '
        'Threshold
        '
        Me.Threshold.Location = New System.Drawing.Point(357, 458)
        Me.Threshold.Maximum = 1000
        Me.Threshold.Minimum = 1
        Me.Threshold.Name = "Threshold"
        Me.Threshold.Size = New System.Drawing.Size(399, 45)
        Me.Threshold.TabIndex = 378
        Me.Threshold.Value = 500
        '
        'Gamma
        '
        Me.Gamma.Location = New System.Drawing.Point(357, 498)
        Me.Gamma.Maximum = 100
        Me.Gamma.Minimum = 1
        Me.Gamma.Name = "Gamma"
        Me.Gamma.Size = New System.Drawing.Size(399, 45)
        Me.Gamma.TabIndex = 376
        Me.Gamma.Value = 50
        '
        'SavePic
        '
        Me.SavePic.Location = New System.Drawing.Point(643, 212)
        Me.SavePic.Name = "SavePic"
        Me.SavePic.Size = New System.Drawing.Size(72, 22)
        Me.SavePic.TabIndex = 380
        Me.SavePic.Text = "Save"
        Me.SavePic.UseVisualStyleBackColor = True
        '
        'XtremePhoto
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(776, 562)
        Me.Controls.Add(Me.SavePic)
        Me.Controls.Add(Me.DoGamma)
        Me.Controls.Add(Me.DoThreshold)
        Me.Controls.Add(Me.Threshold)
        Me.Controls.Add(Me.Gamma)
        Me.Controls.Add(Me.GrayScale)
        Me.Controls.Add(Me.GetForeImage)
        Me.Controls.Add(Me.Label15)
        Me.Controls.Add(Me.Label14)
        Me.Controls.Add(Me.Label13)
        Me.Controls.Add(Me.Label12)
        Me.Controls.Add(Me.Label11)
        Me.Controls.Add(Me.Label10)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.Label8)
        Me.Controls.Add(Me.GetMage)
        Me.Controls.Add(Me.TrackBar20)
        Me.Controls.Add(Me.TrackBar21)
        Me.Controls.Add(Me.TrackBar22)
        Me.Controls.Add(Me.TrackBar23)
        Me.Controls.Add(Me.TrackBar24)
        Me.Controls.Add(Me.TrackBar15)
        Me.Controls.Add(Me.TrackBar16)
        Me.Controls.Add(Me.TrackBar17)
        Me.Controls.Add(Me.TrackBar18)
        Me.Controls.Add(Me.TrackBar19)
        Me.Controls.Add(Me.TrackBar10)
        Me.Controls.Add(Me.TrackBar11)
        Me.Controls.Add(Me.TrackBar12)
        Me.Controls.Add(Me.TrackBar13)
        Me.Controls.Add(Me.TrackBar14)
        Me.Controls.Add(Me.TrackBar5)
        Me.Controls.Add(Me.TrackBar6)
        Me.Controls.Add(Me.TrackBar7)
        Me.Controls.Add(Me.TrackBar8)
        Me.Controls.Add(Me.TrackBar9)
        Me.Controls.Add(Me.TrackBar4)
        Me.Controls.Add(Me.TrackBar3)
        Me.Controls.Add(Me.TrackBar2)
        Me.Controls.Add(Me.TrackBar1)
        Me.Controls.Add(Me.TrackBar0)
        Me.Controls.Add(Me.Label9)
        Me.Controls.Add(Me.ShowCM)
        Me.Controls.Add(Me.Button2)
        Me.Controls.Add(Me.ApplySettings)
        Me.Controls.Add(Me.Label7)
        Me.Controls.Add(Me.PictureBox3)
        Me.Controls.Add(Me.PictureBox2)
        Me.Controls.Add(Me.PictureBox1)
        Me.Controls.Add(Me.Label5)
        Me.Controls.Add(Me.Label4)
        Me.Controls.Add(Me.Label3)
        Me.Controls.Add(Me.Label1)
        Me.Name = "XtremePhoto"
        Me.Text = "Xtreme Photo Color"
        CType(Me.TrackBar0, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar2, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar3, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar4, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar5, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar6, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar7, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar8, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar9, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar10, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar11, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar12, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar13, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar14, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar15, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar16, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar17, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar18, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar19, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar20, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar21, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar22, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar23, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TrackBar24, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.Threshold, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.Gamma, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents TrackBar0 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar1 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar2 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar3 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar4 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar5 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar6 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar7 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar8 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar9 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar10 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar11 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar12 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar13 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar14 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar15 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar16 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar17 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar18 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar19 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar20 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar21 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar22 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar23 As System.Windows.Forms.TrackBar
    Friend WithEvents TrackBar24 As System.Windows.Forms.TrackBar
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents Label2 As System.Windows.Forms.Label
    Friend WithEvents Label3 As System.Windows.Forms.Label
    Friend WithEvents Label4 As System.Windows.Forms.Label
    Friend WithEvents Label5 As System.Windows.Forms.Label
    Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
    Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
    Friend WithEvents PictureBox3 As System.Windows.Forms.PictureBox
    Friend WithEvents Label7 As System.Windows.Forms.Label
    Friend WithEvents ApplySettings As System.Windows.Forms.Button
    Friend WithEvents Button2 As System.Windows.Forms.Button
    Friend WithEvents ShowCM As System.Windows.Forms.TextBox
    Friend WithEvents Label9 As System.Windows.Forms.Label
    Friend WithEvents GetMage As System.Windows.Forms.Button
    Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
    Friend WithEvents Label8 As System.Windows.Forms.Label
    Friend WithEvents Label10 As System.Windows.Forms.Label
    Friend WithEvents Label11 As System.Windows.Forms.Label
    Friend WithEvents Label12 As System.Windows.Forms.Label
    Friend WithEvents Label13 As System.Windows.Forms.Label
    Friend WithEvents Label14 As System.Windows.Forms.Label
    Friend WithEvents Label15 As System.Windows.Forms.Label
    Friend WithEvents GetForeImage As System.Windows.Forms.Button
    Friend WithEvents GrayScale As System.Windows.Forms.Button
    Friend WithEvents DoGamma As System.Windows.Forms.Button
    Friend WithEvents DoThreshold As System.Windows.Forms.Button
    Friend WithEvents Threshold As System.Windows.Forms.TrackBar
    Friend WithEvents Gamma As System.Windows.Forms.TrackBar
    Friend WithEvents SavePic As System.Windows.Forms.Button
    Friend WithEvents SaveFileDialog1 As System.Windows.Forms.SaveFileDialog
End Class

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here


Written By
Web Developer
United States United States
Started in IT in 1959 working on Electronic accounting machines.

Worked through wiring panels and card systems.

1963-1965 USArmy
1961-1975 Computer Supervisor Contental Can
1975-1998 Data Force Incorporated - President
1998-2006 IT Director Promotions Unlimited Corp
2007 retired, project DesignLab(C)2007

Design and concept rules, coding is a required evil


Comments and Discussions