有一个对象名称是 TxtPassword 文本框,运行后,在该文本框中输入“A”后,文本框中显示的是: A 。 Private Sub TxtPassword_KeyPress （） If KeyAscii >= 122 Or KeyAscii =< 97 Then KeyAscii =0 Beep End If End Sub