Private Sub CheckBox1_MouseDown(sender As Object, e As _
      System.Windows.Forms.MouseEventArgs)
 
    End Sub

    Private Sub CheckBox10_CheckedChanged(sender As System.Object, e As _
      System.EventArgs) Handles CheckBox10.CheckedChanged
 
    End Sub

        If e.Button = MouseButtons.Right Then
            PlazierenTextbox(sender)
        End If