《键盘里飞出的表情》一课的知识与技能目标是什么?()

A.能够使用上档键，输入上档字符和大写字母

B.根据实际情况灵活使用大写字母锁定键和上档键

C.通过输入表情符号和缩略词，掌握上档字符和大写字母的输入方法

D.通过练习并测试录入带有符号、小写字母和大写字母的文本，检验学习成果，巩固新知

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

A．Private Sub Text1_ KeyPress (KeyAscii As Integer) IfKeyAscii ＜ 65 Or KeyAscii ＞ 9t Then MsgBox “请输入大写字母” End If End sub

B．Private Sub Text1_ KeyDown (KeyCode As Integer, Shift As Integer) 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 SinglE)IfAsc (Text1.Text) ＜ 65 Or Asc (Text1. Text) ＞ 91 Then MsgBox “请输入大写字母” End If End sub

D．Private Sub Text1_ Change() IfAsc(Text 1.Text) ＜ 65 Or 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