某女患者头痛数月，遇到感冒和月经来潮时疼痛加重。出于彻底检查的目的到医院坚决要求做CT检查，被医师拒绝。医师开出脑电图检查单和请耳鼻喉科会诊单，患者很不满意。为构建和谐医患关系，该医师应该（）

A.维持契约关系，完全按患者要求办，开单做CT检查

B.维持契约关系，坚决按医生意见办，待脑电图检查后再定

C.维持契约信托关系，说服患者先行体格检查，然后酌情处理

D.维持信托关系，对不信赖者拒绝接诊

E.维持信托关系，先做CT和脑电图并进行会诊，然后体检

下列程序的执行结果为( )。
Private Sub Command1_Click()
Dim FirStr As String
FirStr="abcdef"
Print Pat(FirStr)
End Sub
Private Function Pat(xStr As String) As String
Dim tempStr As String, strLen As Integer
tempStr=""
strLen=Len(xStr)
i=1
Do While i＜＝Len(xStr)-3
tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr, strLen -1+1,1)
i=i+1
Loop
Pat=tempStr
End Function

A) abcdef
B) afbecd
C) fedcba
D) defabc