SPread 如何实现鼠标右击选中单元格？

收藏

SPread 如何实现鼠标右击选中单元格？我加了代码右击出现快捷菜单，但是单元格不跟着变。VB6.0和SPREAD8.0

Private Sub fpSpread1_RightClick(ByVal ClickType As Integer, ByVal Col As Long, ByVal Row As Long, ByVal MouseX As Long, ByVal MouseY As Long)
PopupMenu mnuFile
End Sub

ZenosZeng · ZenosZeng

我添加了以下菜单和代码可以正常显示右键菜单

Private Sub A_Click(Index As Integer)
fpSpread1.SetText fpSpread1.ActiveCol, fpSpread1.ActiveRow, "A"
End Sub
Private Sub B_Click()
fpSpread1.SetText fpSpread1.ActiveCol, fpSpread1.ActiveRow, "B"
End Sub
Private Sub C_Click()
fpSpread1.SetText fpSpread1.ActiveCol, fpSpread1.ActiveRow, "C"
End Sub
Private Sub fpSpread1_RightClick(ByVal ClickType As Integer, ByVal Col As Long, ByVal Row As Long, ByVal MouseX As Long, ByVal MouseY As Long)
PopupMenu mnuFile
End Sub

复制代码

代码.png (109.83 KB, 下载次数: 253)

ZenosZeng · ZenosZeng

显示菜单.png (18.18 KB, 下载次数: 238)

		自动登录	找回密码
密码			立即注册

SPread 如何实现鼠标右击选中单元格？

2 个回复

活字格认证

圣诞拼拼乐

微信认证勋章

讲师达人

元老葡萄

悬赏达人