VBA-在用户窗体中移动文本框

Question

我在用户窗体中有40个文本框，但大多数时候我只使用前7到8个文本框，如果第8或第9个文本框为空，则可以移动到最后一个文本框40。

Answer 1

一个可能的解决方案是，如果每个文本框都包含被删除的默认文本，这将触发TextBox＃.Change例程。 Return键不会触发Change例程，并且40个文本框中的每个文本框都需要一个TextBox＃.Change例程。

将每个文本框设置为“ Tab”，然后将用户窗体的EnterFieldBehavior属性设置为SelectAll，并在每个框中设置默认文本，例如“ Enter”...。制表符选择该框的内容，而Delete键触发Change例程，它可以处理您要使用部分完成的用户表单完成的其余工作。