限制文本框內輸入字符串長度

利用文本框的MaxLength屬性，可以限制文本框內的數據長度。一般情況下，在用戶窗體的初始化事件中對文本框的這個屬性進行設置。當然，也可以在文本框的屬性窗口直接設置該屬性。

以下程序限定文本框最多只能輸入10個字符。

private sub UserForm_Initialize() TextBox2.MaxLength=10 TextBox2.ControlTipText="最大長度不超過 10"End Sub

效果如下：

限制只能輸入負號，阿拉伯數字和小數點

利用文本框的KeyPress事件，可以限制只能在文本框輸入數字，小數點和負號。如果輸入其他字符，則無效。參考以下案例：

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If (KeyAscii < Asc("0") Or KeyAscii > Asc("9")) And KeyAscii <> Asc(".") And KeyAscii <> Asc("-") Then KeyAscii = 0 Beep End IfEnd Sub