VBA-在用戶窗體中移動文本框

Question

我在用戶窗體中有40個文本框，但大多數情況下我只使用前7到8個文本框，如果第8或第9文本框為空，則有什么辦法可以移動到最后一個文本框40

Answer 1

一個可能的解決方案是，如果每個文本框都包含被刪除的默認文本，這將觸發TextBox＃.Change例程。 Return鍵不會觸發Change例程，並且40個文本框中的每個文本框都需要一個TextBox＃.Change例程。

將每個文本框設置為“ Tab”，將用戶窗體的EnterFieldBehavior屬性設置為SelectAll，並在每個框中設置默認文本，例如“ Enter”...。制表符選擇該框的內容，然后Delete鍵觸發Change例程，該例程將處理您想要使用部分完成的用戶表單完成的其余工作。