已知c:\1．txt是一个非空文件，其程序代码如下。 Private Sub Command1_Click() Dim MaxSize，NextChar，MyChat Open"c:\1．txt"For Input As#1 MaxSize=LOF(1) For NextChar=MaxSize To 1 Step-1Seek #1，NextCharMyChar=Input(1，#1) Next NextChar Print EOF(1) Close #1 End Sub 程序运行后，单击命令按钮，其输出结果为______。

A．True

B．Null

C．0

D．False

男性，36岁，腰痛2年，半个月前B超发现右肾结石3.0cm，并有右肾积水中度。5天前感冒发热并右腰痛加重，伴高热、尿频、尿痛，查体温38.5℃，右肾区叩痛明显，尿检红细胞充满/HP，肾图右肾功能严重受损，左侧正常B超右肾中度积水，肾盂内透声不好疑感染，右肾穿刺为脓性，其治疗方法是（）

A.右肾切除

B.继续消炎治疗

C.右肾切开取石

D.右肾造瘘

E.体外震波碎石