标题：状态按钮中如何设置回车键向下代码

如题

参考：

 

http://help.foxtable.com/topics/0385.htm

 

  在菜单设计的事件curenntchange中输入如下代码：

Dim Togenter As RibbonMenu.ToggleButton = RibbonTabs("Common").Groups("回车").Items("回车")

Togenter.Pressed = False

 

  然后在功能区增加“回车”组，增加状态按钮“回车”，并在相关事件中输入如下代码就可以了

CurrentTable.EnterKeyActionDown =  e.ToggleButton.Pressed

If e.ToggleButton.Pressed = True Then   

    e.ToggleButton.Text ="向下"

Else

    e.ToggleButton.Text ="向右"

End If

 

这个答案我想比老大的答案要好的多