问题
单项选择题
在窗体上画一个命令按钮和一个文本框(名称分别为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属性用于设置是否在控件的键盘事件之前激活窗体的键盘事件。KeyPress(KeyAscii As Integer)事件是在对象具有焦点时，按下键盘上的键时触发的事件，KeyAscii参数是所按键的Ascii的代码，将每个字符的大、小写形式作为不同的键代码解释。Chr()可返回Ascii码对应的字符。
本题程序运行时，在文本框中每输入一个字符，该字符将被连入变量SaveAll中，当输入为“VB'’时，SaveAll＝“VB”。单击命令按钮后，文本框中显示内容应为“vbVB”。