vb ctrl+单击 如果判断

来源：百度知道 编辑：UC知道 时间：2024/06/24 01:34:45
目 的 是 想模拟一下文件夹中连续多选和不连续多选的问题，要能在单击时，判断是否按下了ctrl或者shift键，谢谢！

看MouseDown或MouseUp事件里的SHIFT，如果是SHIFT=1说明按下了SHIFT建，如果等于2说明按下了CTRL键。
试下按下ctrl或者shift键来单击有什么不同：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox Shift
End Sub