单项选择题

在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str AS String, n As Integer
str=UCase(Chr(KeyAscii))
n=Len(str)
Text1. Text=String(n, str)
End Sub
程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。

点击查看答案&解析