仅使用一个＆＃39; Enter＆＃39;激活UserForm

Question

我想启动UserForm，只需按一个数字并按Enter键（所​​以不涉及点击）。我遇到的问题是按两次Enter键。如果我第一次按Enter键会在var xd1 = schedule.scheduleJob('*/25 */5 * * *', function(){ test.js; }); 上关注，而在第二次之后输入它实际上会点击＆＃39; Doorgaan。

有谁知道如何将其更改为一个输入？

Answer 1

只需将title设置为VBE中Doorgaan内的Default即可。每个表单只有一个元素，可以是properties。按default后将激活默认元素。因此，如果您将该按钮设置为Enter，那么当您按Enter键时，该按钮的代码将会运行。

您还可以在运行时更改Default = True元素，如下所示：

Default

顺便说一下，还可以选择将元素设置为UserForm1.btnDoorgaan.Default = True 。当您点击键盘上的Cancel = True时，该元素会被激活。因此，如果您向表单添加Escape按钮并将其分配给Cancel，则只需按Cancel = True即可轻松关闭并退出该表单。

Answer 2

如果你有像你这样的简单形式，拉尔夫的解决方案是实现它的最简单方法

如果你有多个按钮，或者使用标签而不是按钮，你可以做这样的事情

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

    If KeyCode = vbKeyReturn Then Me.Hide    'or CommandButton1_Click

End Sub