单选题在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写如下代码：
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1. Text = " "
Text1. SetFocus
End Sub
Private Sub Command1_Click()
Text1. Text = LCase(SaveAll) + SaveAll
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll = SaveAll + Chr(KeyAscii)
End Sub
程序运行后，直接用键盘输入：VB，再单击命令按钮，则文本框中显示的内容为( )。
A) vbVB B) 不显示任何信息 C) VB D) 出错

【正确答案】 A

【答案解析】[解析] 窗体的] KeyPreview属性用于设置或获取一个值，该值只是判断按键事件传递到具有焦点的控件前，窗体是否将接收此事件，该属性设为True时，窗体将会接收按键事件。因此在文本框中输入“VB”时，会先触发Form_KeyPress()事件，该事件将输入的字符保存到窗体模块变量SaveAll中，然后才会显示在文本框中。当单击命令按钮时，Lease函数将变量saveAll中的字符串“VB”转换为小写，为“vb”，然后与原字符串连接，即“vb”+“VB”，显示在文本框中则为“vbVB”。