蔡某，男，43岁。因乏力、厌食、恶心2个月，胸闷、气促1周入院。身体评估：血压190／110mmHg，呼吸22次／分，贫血貌。实验室检查：血常规：红细胞1.6×10／L，血红蛋白69g/L；血肌酐1689μmol/L，尿素氮37.6mmol／L。B超提示双肾萎缩。

针对此病人应该优先选择下列哪项治疗方法（）

A.血液透析

B.糖皮质激素治疗

C.肾移植

D.中医中药治疗

E.饮食治疗

假定有以下函数过程：　　Function Fun(S As String)　As String　　Dim sl As String　　　For i＝1 To Len(S)　　　　　s1＝UCase　(Mid(S，i，1))+s1　　　Next i　　　Fun＝s1　　End Function则Str2=Fun("abcdefg”)的输出结果为( )。

A．abcdefg

B．ABCDEFG

C．gfedcba

D．GFEDCBA