检测到多个修改键(ctrl& alt)未合并

时间:2018-02-16 05:44:26

标签: vb.net keypress alt ctrl modifier-key

如何检测1个以上的moddifier键? (Alt& Ctrl)?

我有这个工作代码:

Private Sub PictureBox1_MouseWheel(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseWheel
    If ModifierKeys = Keys.Control Then
        If e.Delta <> 0 Then
            PictureBox1.Width += CInt(PictureBox1.Width * e.Delta / 1000)
            PictureBox1.Height += CInt(PictureBox1.Height * e.Delta / 1000)
        end if
     end if
end sub

如果我将其改为:
If ModifierKeys = (Keys.Control Or Keys.Alt) Then 停止工作。 我怎样才能检测到这两个键,但没有合并?

1 个答案:

答案 0 :(得分:2)

If ModifierKeys = Keys.Control OrElse ModifierKeys = Keys.Alt Then

这应该是显而易见的。