回复 13楼leikaihua的帖子
请通过以下代码测试:
- Private Sub fpSpread1_KeyDown(KeyCode As Integer, Shift As Integer)
- Select Case KeyCode
- Case vbKeyV
- If (Shift And vbCtrlMask) > 0 Then
- MsgBox "CTRL V is pressed"
- End If
-
- Case vbKeyC
- If (Shift And vbCtrlMask) > 0 Then
- MsgBox "CTRL C is pressed"
- End If
- End Select
- End Sub
复制代码
为了给你提供更优质的服务,请对本次服务进行评分。我们会认真对待你提出的宝贵意见,谢谢 |