在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程：
Dim Str1 As String，str2 As String
Private Sub form_load()
Text1.Text=""
Text2.Text=""
Text1.Enabled=False
Text2.Enabled=False
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
str1=str1&Chr(KeyAscii)
End Sub
Prirate Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
str2=str2&Chr(KeyCode)
End Sub
Private Sub Command1_Click()
Text1.Text=str1
Text2.Text=str2
str1=""
str2=""
End Sub
当在设计阶段的窗体的KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为
A．abc
B．不显示任何信息
C．ABC
D．出错
参考答案：A
解析： 在Command1的Click事件中将字符串变量str赋给Text1，str变量是在KeyPress事件中被赋值的，语句str=str&Chr(KeyAscii)将输入的字符存储并连接起来，此处是通过参数KeyAscii来得到输入字符的(因此要区分字母的大小写)，又因为在Form的Load事件中将Text1和Text2的Enabled属性设置成False，所以当前拥有输入焦点的对象是窗体，为了使窗体能接收键盘事件，已经将窗体的KeyPreview属性设置为True，所以在输入小写字母abc后，单击Command1，触发其Clidk事件，使得Text1文体控件的值等于str字符串的值，即abc。