利用文本框的KeyPress事件,可以限制只能在文本框內輸入大小寫的英文字母。輸入其他字符則無效。參考以下代碼:
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If (KeyAscii < Asc("a") Or KeyAscii > Asc("z")) And (KeyAscii < Asc("A") Or KeyAscii > Asc("Z")) Then KeyAscii = 0 Beep End IfEnd Sub不顯示輸入到文本框的內容將文本框的PasswordChar屬性設置爲一個不爲零長度的字符串,在文本框輸入數據時,就會不顯示輸入到文本框的內容,而是設置顯示的字符串。
PasswordChar既可以通過程序進行設置,也可以在屬性窗口設置。
以下案例設置一個密碼輸入框,輸入的密碼不直接顯示,而是用*替代,真正的密碼顯示在另一個假設的文本框。
Private Sub TextBox1_Change() Me.TextBox2.Text = Me.TextBox1.TextEnd Sub效果如下:
![](http://image.uc.cn/s/wemedia/s/upload/2024/9b6976844ea80689b35024a3e2e3f3b0.jpg)