问题
单项选择题
在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview属性设置为True，然后编写如下代码：
Dim Save All As String
Private Sub Command1_Click()
Text1.Text=UCase(SaveAll)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后，在键盘上输入“abcdefg”，单击命令按钮，则文本框中显示的内容为 ______。
A．abcdefg
B．不显示任何信息
C．ABCDEFG
D．出错
答案
参考答案：C
解析：[评析] KeyPreview属性返回或设置一个值，以决定是否在控件的键盘事件之前激活窗体的键盘事件。键盘事件为：KeyDown、KeyUp和KeyPress。
UCase函数的作用是将指定的字符串中的字符转化为大写。