在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入。以下能实现

问题：

在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是

A．Private Sub Text1_KeyPress(KeyAscii As Intege If Key Ascii＜65 Or KeyAscii＞90 Then MsgBox“请输入大写字母” KeyAscii=0 End If End Sub

B．Pfivate Sub Text1_KeyDown(KeyCode As Integer,Shift As Intege If KeyCode＜65 Or KeyCode＞90 Then MsgBox“请输入大写字母” KeyCode=0 End 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