单项选择题
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As StringPrivate Sub Form_ Load ()
Show Text1.Text=" "
Text1.SetFocusEnd
SubPrivate 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.出错