vb.net에서 색상을 비교하는 방법

Question

일부 Vb.Net Forms 응용 프로그램에서 일부 UI 작업을하고 있습니다. 일부 색상과 일치시키고 UI를 변경해야하는 곳에서 일치하도록 약간 매달 렸습니다. 색상 값,

처럼 A_Control.Background는 = B_Control.Background

는 , 나는 기능을 구현하려는

내가 문자열로 색상을 받고 다음 일치하는 짓을하지만 어떤 경우에 효과가없는, 즉 작동 색상 변수로 직접.

처럼이 내가 문자열에서 RGB 값을 가질 수 있고 그때 다른 색상과 일치하도록 정수로 변환 할 수 있습니다 수행하여

Dim somecolor As New Color() 
somecolor = Color.FromArgb(255, 98, 153, 192) 
Dim str As String = somecolor.R.ToString() + somecolor.G.ToString() + somecolor.B.ToString() 

,이 작업을 수행하는 더 좋은 방법은 무엇입니까?

Answer 1

여기에 내가 테스트 한 간단한 솔루션입니다 ..

Public Function MatchColor() As Boolean 
Dim cl As New Color() 
'color to match 
cl = Color.FromArgb(255, 98, 153, 192) 
If Me.BackColor.Equals(cl) Then 
    ' match the color with current forms background // you can use any 
    Return True 
Else 
    Return False 
End If 
End Function 

및 기능 여기

Private Sub button3_Click(sender As Object, e As EventArgs) 
Dim match As Boolean = MatchColor() 
End Sub 

희망 콜이 당신을 도울 수 있습니다.

Answer 2

타이머 (시간) 및 colordialog (cdcolor)가있는 양식이 필요합니다.

Private Sub time_Tick(sender As Object, e As EventArgs) Handles time.Tick 
     t += 1 
     Select Case t 
      Case 0 
       Me.BackColor = ccolor1 
      Case 1 
       Me.BackColor = ccolor2 
      Case 2 
       Me.BackColor = ccolor3 
      Case 3 
       t = 0 
     End Select 
    End Sub 

: 당신이 색상 변경 그 후

Imports System.Drawing 
Public Class Form1 
    Dim ccolor1 As Color = Color.(pick your color) 
    Dim ccolor2 As Color = Color.(pick your color) 
    Dim t = 0 

: 시작