在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是 ______。
A.Private Sub Text1_KeyPress(KeyAscii As IntegeIfKeyAscii<65 Or KeyAscii>90 Then MsgBox“请输入大写字母” KeyAscii=0End If End Sub
B.Private Sub Text1_KeyDown(KeyCode As Integer,Shift As IntegeIf KeyCode<65 Or KeyCode>90 Then MsgBox“请输入大写字母” KeyCode=0End If End Sub
C.Private Sub Text1 MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Singl, If Asc(Text1.Tex<65 Or Asc(Text1.Tex>90 Then MsgBox“请输入大写字母” End If End Sub
D.Private Sub Text1_Change()If Asc(Text1.Tex>64 And Asc(Text1.Tex<91 Then MsgBox“请输入大写字母”End If End Sub
参考答案:A
解析:[评析] Asc函数是将字符转化成ASCII码值。大写字母的ASCII码值为65-90(包括65和90)。KeyDown和KeyUp事件返回的是“键”,而KeyPress事件返回的是“字符”的ASCII码。