2017-06-13 115 views
-1

其基本顏色選擇器 現在當如果階梯指定的顏色釣到它播放歌曲 什麼希望的是,當一旦這種顏色再次挑選的歌曲應該發揮再次 我試着使用線程;但它不工作提前 感謝..我要重新啓動定時器

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As 
       System.EventArgs) Handles Timer1.Tick 
     Dim BMP As New Drawing.Bitmap(1, 1) 
     Dim GFX As System.Drawing.Graphics = 
     System.Drawing.Graphics.FromImage(BMP) 
     GFX.CopyFromScreen(New Drawing.Point(MousePosition.X, MousePosition.Y), _ 
         New Drawing.Point(0, 0), BMP.Size) 
     Dim Pixel As Drawing.Color = BMP.GetPixel(0, 0) 
     CPpanel.BackColor = Pixel 
     redtxt.Text = Pixel.R 
     greentxt.Text = Pixel.G 
     bluetxt.Text = Pixel.B 

     If redtxt.Text = 0 Then 
      If greentxt.Text = 173 Then 
       If bluetxt.Text = 73 Then 
       AxWindowsMediaPlayer1.URL = "song.mp3" 
       Timer1.Stop() 
      End If 
     End If 
     Else 
      Timer1.Start() 
     End If 

End Sub 

回答

0

它看起來像後你的顏色拾取您的停止計時器:

AxWindowsMediaPlayer1.URL = "song.mp3" 
Timer1.Stop() 

Timer1_Tick事件將不會被再次調用,除非你是在別的地方再次啓動計時器。如何挑選顏色 - 只需將鼠標移動到位圖上即可?處理點擊事件而不是計時器滴答事件可能會更好,但如果沒有看到更多的代碼,很難說。

+0

謝謝。但是我也在if else階段之後嘗試了'timer1.start()'。這就是整個代碼。我只想在捕捉RGB值中指定的顏色後重新啓動計時器。 –

+0

@NirmalPatel:你爲什麼要停止計時器_at all_如果你想繼續? –

+0

如果我不停止在if條件下的計時器,那麼它會播放歌曲。那是爲什麼...... @visual vincent –

相關問題