（ 31 ） 在窗体上画一个命令按钮和一个文本框 （ 名称分别为 Command1 和 Text1 ） ， 并把窗体的Keyprewie w属性设置为 True ，然后编写如下代码：

D．im SaveAll As String

Private Sub Form_Load ()

Show

Text1.Text= ” ”

Text1.SetFocus

E．nd Sub

Private Sub Command1_Click()

Text1.Text=Lcase(SaveAll)+SaveAll

E．nd Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

SaveAll=SaveAll+Chr(KeyAscii)

E．nd Sub

程序运行后，直接用键盘输入： VB ，再单击命令按钮，则文本框中显示的内容为

A． ） vbVB

B． ）不显示任何信息

C． ） VB

D． ）出错