vb 鼠标事件中的shift参数怎么用啊

shift取值0到7shift=0 Alt,Shift,Ctrl都没按下shift=1 按Shift键shift=2 按Ctrl键shift=3 按Shift+Ctrl键shift=4 按Alt键shift=5 按Alt+Shift键shift=6 按Alt+Ctrl键shift=7 按Alt+Shift+Ctrl键摘自网友