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

A．pp

B．pP

C．PP

D．Pp

《国家中长期教育改革和发展规划纲要》颁布后，人们认识到，观念变革是改革的先导，教育改革的第一步应该是转变观念。这一认识的依据是[ ]

A．社会意识具有相对独立性

B．社会意识是对社会存在的反映

C．社会意识对社会发展起推动作用

D．社会历史是由社会发展规律决定的