在窗体上画一个名称为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 SubB．Private Sub Text1_KeyDown(KeyCode As Integer, Shift As I

[单选题]在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入，以下能实现该操作的事件过程是______。A．Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＜65 Or KeyAscii＞90 Then MsgBox"请输入大写字母" KeyAscii=0 End If End SubB．Private Sub Text1_KeyDown(Keycode As Integer, Shift As Integer

[单选题]在窗体上画一个名称为Textl的文本框．要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是：（ ）A．Private Sub Text1＿KeyPress(KeyAscii As Integer)If KeyAscii<65 0r KeyAscii>90ThenB．C．D．

[单选题]（ 19 ）在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()D．im i As Integer, n As IntegerF．or i = 0 To 50i = i + 3n = n + 1If i > 10 Then Exit ForNextText1.Text = Str(n)E．nd Sub程序运行后，单击命令按钮，在文本框中显示的值是A． ） 5B． ） 4C． ）

[单选题]（ 17 ） 在窗体上画一个文本框 （ 其名称为 Text1 ） 和一个标签 （ 其名称为 Label1 ） ， 程序运行后 ， 如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是A． ） Private Sub Text1_Click()Label1.Caption = Text1.TextE．nd SubB． ） Private Sub Text1_Change()Label1.Caption = Text1.TextE．nd SubC． ） Pri

[单选题]（ 15 ）在窗体上画一个文本框（名称为 text1 ）和一个标签（名称为 label1 ） , 程序运行后，在文本框中每输入一个字符 ， 都会立即在标签中显示文本框中字符的个数 ， 以下可以实现实现上述操作的事件过程是A． ）Private Sub Text1_Change()Label1.Caption = Str(Len(Text1.Text))E．nd SubB． ）Private Sub Text1_Click()Label1.Caption = Str(Len(Text1.Text)

[试题]（12）在窗体上画一个文本框，名称为 Text1，然后编写如下程序：Private Sub Form_Load( )Open "d:/temp/dat.txt" For Output As #1Text1.Text=""E．nd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii=13 ThenIf UCase(Text1.Text)= (14) ThenC．lose #1E．ndE．lseWrite #1, (15)

[单选题]在窗体(名称为Forml)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。A． Private Sub Text1_Change() Commandl.Caption="计算机等级考试" End SubB．Private Sub Commandl_Click() Caption=”计算机等级考试” End SubC．Pr

[单选题]在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写如下事件过程：Private Commandl_Click（）D．im i As Integer, n As IntegerF．or i=0 To 50i = i+3n = n+1If i>10Then Exit ForNextTextl.Text=Str（n）E．nd Sub程序运行后，单击命命令按钮，在文本框中显示的值是（ ）。 A．5B．4C．3D．2

[单选题]（27）在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )D．im i As Integer, n As IntegerF．or i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNextText1.Text=Str(n)E．nd Sub程序运行后，单击命令按钮，在文本框中显示的值是（ ）。A．）2B．）3C．）4D．）5