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

A:Private SubText1_KeyPress(KeyAscii As Integer) B:If KeyAscii＜65 or KeyAscii＞90 Then C:MsgBox“请输入大写字母” D:KeyAscii=0 E:End If F:End Sub G:B. Private Sub Text1_KeyDown( KeyCode As Integer,Shift As Integer) H:If KeyCode ＜ 65 or KeyCode ＞ 90 Then I:Msgbox“请输入大写字母” J:KeyCode = 0 K:End If L:End Sub M:C. Private SuB Text1_MouseDown( Button AS Integer,_ N:Shift As lnteger,X As Single,Y As Single)

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

A:Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii＜65 Or KeyAscii＞90 Then
MsgBox"请输入大写字母"
KeyAscii=0
End If
End Sub B:Private Sub Text1_KeyDown(Keycode As Integer, Shift As Integer)
If KeyCode＜65 Or Keycode＞90 Then
MsgBox"请输入大写字母"
KcyCode=0
End If
End Sub C:Private Sub Text1_MouseDown(Button As Integer,
Shift As Integer, X As Single, Y As Single)
If Asc(Text1. Text)＜65 Or Asc(Text1. Text)＞90 Then
MsgBox"请输入大写字母"
End If
End Sub D:Private Sub Text1_Change()
If Asc(Text1. Text)＞64 Or Asc(Text1. Text)＜91 Then
MsgBox"请输入大写字母"
End If
End Sub

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

A:Private Sub Text1_KeyPress(KeyAscii As Integer)
IfKeyAscii＜65 Or KeyAscii＞90 Then
MsgBox“请输入大写字母”
KeyAscii=0
End If
End Sub B:Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer)
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 Single)，
If Asc(Text1.Text)＜65 Or Asc(Text1.Text)＞90 Then
MsgBox“请输入大写字母”
End If
End Sub D:Private Sub Text1_Change()
If Asc(Text1.Text)＞64 And Asc(Text1.Text)＜91 Then
MsgBox“请输入大写字母”
End If
End Sub

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

A:Private Sub Text1_KeyPress(KeyAscii As Integer) 　　　　If KeyAscii < 65 Or KeyAscii > 90 Then 　　　　　　MsgBox "请输入大写字母" 　　　　　　KeyAscii = 0 　　　　　End If 　　　　End Sub B:Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) 　　　　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 Single) 　　　　If Asc(Text1.Text) < 65 Or Asc(Text1.Text) > 90 Then 　　　　　　　MsgBox "请输入大写字母" 　　　　　End If 　　　　End Sub D:Private Sub Text1_Change() 　　　　If Asc(Text1.Text) ＞ 64 And Asc(Text1.Text) ＜ 91 Then 　　　　　　MsgBox "请输入大写字母" 　　　　　End If 　　　　End Sub

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

A:Private Sub Text1_ KeyPress (KeyAscii As Intege IfKeyAscii ＜ 65 Or KeyAscii ＞ 9t Then MsgBox “请输入大写字母” End If End sub B:Private Sub Text1_ KeyDown (KeyCode As Integer, Shift As Intege IfKeyCode ＜ 65 Or KeyCode ＞ 91 Then MsgBox “请输入大写字母” End If End sub C:Private Sub Text1_ MouseDown (Button As Integer, _ Shift As Integer, X As Single, YAs Singl IfAsc (Text1.Tex ＜ 65 Or Asc (Text1. Tex ＞ 91 Then MsgBox “请输入大写字母” End If End sub D:Private Sub Text1_ Change() IfAsc(Text 1.Tex ＜ 65 Or Asc(Text1. Tex ＞ 91 Then MsgBox “请输入大写字母” End If End sub

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

A:Private Sub Text1_KeyPress(KeyAscii As Integer) 　　　　If KeyAscii < 65 Or KeyAscii > 90 Then 　　　　　　MsgBox "请输入大写字母" 　　　　　　KeyAscii = 0 　　　　　End If 　　　　End Sub B:Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) 　　　　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 Single) 　　　　If Asc(Text1.Text) < 65 Or Asc(Text1.Text) > 90 Then 　　　　　　　MsgBox "请输入大写字母" 　　　　　End If 　　　　End Sub D:Private Sub Text1_Change() 　　　　If Asc(Text1.Text) ＞ 64 And Asc(Text1.Text) ＜ 91 Then 　　　　　　MsgBox "请输入大写字母" 　　　　　End If 　　　　End Sub

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

A:Private Sub Text1_KeyPress(KeyAscii As Integer) 　　If KeyAscii＜65 Or KeyAscii＞90 Then 　　　MsgBox"请输入大写字母" 　　　KeyAscii=0 　　End If 　End Sub B:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) 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 Single) If Asc(Text1.Text)＜65 Or Asc(Text1.Text)＞90 Then 　　MsgBox"请输入大写字母" 　End If End Sub D:Private Sub Text1_Change() 　　If Asc(Text1.Text)＞64 And Asc(Text1.Text)＜91 Then 　　　MsgBox"请输入大写字母" 　　End If End Sub

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

A:Private Sub Text1_KeyPress(KeyAscii As Intege IfKeyAscii＜65 Or KeyAscii＞90 Then MsgBox“请输入大写字母” KeyAscii=0 End If End Sub B:Private 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

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

A:Private Sub Text1_KeyPress(KeyAscii As Intege　　　　If KeyAscii < 65 Or KeyAscii > 90 Then　　　　　　MsgBox "请输入大写字母"　　　　　　KeyAscii = 0　　　　　End If　　　　End Sub B:Private 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