[已解决]表格里的微调框，如何判断是按了向上还是向下的箭头？

lan8930

  如题，用微调框来调节月份。然后用VBA来实现某些功能，如果按的是向上的键头，则运行一段代码，如果按了向下的箭头，则运行另一断代码
求助：如何判断，是按了向上的还是按了向下的箭头？在线等，谢谢

最佳答案

月排行榜 / 总排行榜

砂海

2022-1-27 09:32

貌似 Active 控件 才有 , ( KeyUp / KeyDown ) 事件

Private Sub SpinButton1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

End Sub

Private Sub SpinButton1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

End Sub

=====================
硬要用 表单 控件 的话 , 可以 考虑 用 辅助单元格 来过渡 实现

=====================
如说法 有误 , 欢迎指正

跳转到最佳答案楼层

砂海

貌似 Active 控件 才有 , ( KeyUp / KeyDown ) 事件

Private Sub SpinButton1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

End Sub

Private Sub SpinButton1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

End Sub

=====================
硬要用 表单 控件 的话 , 可以 考虑 用 辅助单元格 来过渡 实现

=====================
如说法 有误 , 欢迎指正

vitrel

我也来凑一下热闹。
我的看法与2楼的高手并不相同，
因此我看了楼主的表达，好像没那么复杂，
他的意思好像只是不知道：上、下键哪个是对应增加月份？哪个是对应减少月份的？
如果我对楼主问题的理解是正确的，那回答就简单得多，
上、下键所对应的两个代码是编程者自由（按自己的喜好）编写的，
使用者如果有权限修改代码的话，也可以自动调整、修改。
总的来说，上、下键对就月份的增加或减少，完全没有规律，更没有规定，要看实际代码。
再进一步说，试运行一下不就一清二楚了吗？！
和2楼高手一样，如说法有误，欢迎指正。

大灰狼1976

相信微调控制月份楼主已经没问题了，另外的需求可以使用spinup和spindown事件

lan8930

砂海 发表于 2022-1-27 09:32
貌似 Active 控件 才有 , ( KeyUp / KeyDown ) 事件

Private Sub SpinButton1_KeyDown(ByVal KeyCode As ...

谢谢，我昨天在线等没有等到答案 。最后用辅助单元格来判断的。您说的方法，我也试试，非常感谢！

rrxfw

高手多多