下列哪种方法不能产生大写字母？（）

A:按住Shift键的同时输入字母 B:按下CapsLock键以后输入字母 C:在浮动的“控制板”中将小写字母改为大写 D:选择“文字>文字样式>正常”就可以变成大写字母

在窗体上画一个名称为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 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

在窗体上画一个名称为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 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"请输入大写字母" KcyCode=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 Or Asc(Text1. Tex＜91 Then MsgBox"请输入大写字母" End If End Sub

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

A:Private SubText1_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 lnteger,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) ＞9l Then Msgbox“请输入大写字母” End lf 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