在窗体上有一个文本框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中显示的内容为( )。

A．pp

B．pP

C．PP

D．Pp

根据个人所得税法规定，属于非居民纳税人的是

A．在中国境内无住所且不居住，但有来源于中国境内所得

B．在中国境内无住所，但居住时间满一个纳税年度

C．在中国境内有住所，但连续五年未居住

D．在中国境内有住所，但目前未居住