在窗体上一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSubText2_KeyPress(KeyAs

在窗体上一个文本框，其名称为Text1,然后编写如下事件过程：

PrivateSubText2_KeyPress(KeyAsciiAsInteger)

DimstrAsString,nAsInteger

str=Ucase(Chr(KeyAscii))

n=Len(str)

Text1=String(n,str)

EndSub

程序运行后，如果在TEXT2中通过键盘上输入单字母"k"，则在文本框Text1中显示的内容为( )

A.k

B.K

C.KK

D.Kk