本系列文章繼續給大家介紹文本框在VBA窗體中的應用。之前的文章介紹了文本框的Exit事件。今天繼續給大家介紹文本框事件。 本文介紹文本框的Change事件，利用Change事件控制文本框的內容輸入。 在文本框中內容被修改時執行程序文本框的Change事件是一個非常有用的事件，利用Change事件，可以對輸入到文本框中的內容進行各種控制。 以下案例是在文本框TextBox1中輸入數據時，檢查輸入的字符串長度是否超過了規定的長度。如果超過了規定的長度，就自動截斷數據。參考代碼如下： ' 文本框Change事件Private Sub TextBox1_Change() If Len(Me.TextBox1.value) > 10 Then MsgBox "數據長度不能超過10個字符。超過的部分會被自動截斷。" Me.TextBox1.value = Left(Me.TextBox1.value, 10) ' 超過限制的部分，自動截斷，始終只要前10個字符 Me.TextBox1.SetFocus ' 設置文本框獲取焦點 End IfEnd Sub