检测到超过 1 个修饰键(ctrl 和 alt)未组合
Detect more than 1 modifier keys (ctrl & alt) not combined
如何检测超过 1 个修改键? (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
停止工作。
我怎样才能检测到这两个键,但不组合?
If ModifierKeys = Keys.Control OrElse ModifierKeys = Keys.Alt Then
那真的应该很明显。
如何检测超过 1 个修改键? (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
停止工作。
我怎样才能检测到这两个键,但不组合?
If ModifierKeys = Keys.Control OrElse ModifierKeys = Keys.Alt Then
那真的应该很明显。