[مبتدئ]

كود :

Private Sub TrackBar1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TrackBar1.KeyDown
        If e.KeyCode = Keys.Right Then
            Label1.Visible = True
        End If
        If e.KeyCode = Keys.Left Then
            Label1.Visible = True
        End If
    End Sub

    Private Sub TrackBar1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TrackBar1.KeyUp
        If e.KeyCode = Keys.Right Then
            Label1.Visible = False
        End If
        If e.KeyCode = Keys.Left Then
            Label1.Visible = False
        End If
    End Sub
    Private Sub TrackBar2_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TrackBar2.KeyDown
        If e.KeyCode = Keys.Right Then
            Label1.Visible = True
        End If
        If e.KeyCode = Keys.Left Then
            Label1.Visible = True
        End If
    End Sub

    Private Sub TrackBar2_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TrackBar2.KeyUp
        If e.KeyCode = Keys.Up Then
            Label1.Visible = False
        End If
        If e.KeyCode = Keys.Down Then
            Label1.Visible = False
        End If
    End Sub

المشكلة هنا انى TrackBar واحد فقط يعمل اما الثانى لا