请阅读程序：
Option Base 1
Private Sub Form_Click()
Dim Arr(4,4)As Integer
For i=1 To 4
For j=1 To 4
Art(i,j)=(i-1)*2+j
Next j
Next i
For i=3 To 4
For j=3 To 4
Print Arr(j,i)
Next j
Print
Next i
End Sub
程序运行后，单击窗体，则输出结果是( )

A．5 7
6 8 B．6 8
7 9
C．7 9
8 10
D．8 10
8 11

患者孙某，社会性别女，18岁，农民。因不来月经到某教学医院诊治。经医生体格检查和染色体检查，确诊为男性假两性畸形，于是收入住院准备做性别矫正手术。当在别的病房实习的几个实习医生听说后，带着好奇的心情去看望病人，他们找到该人的病室，其中一个实习医生当着病室其他病人的面直接了当征求患者的意见：“听说你是男性假两性畸形病人，让我们检查一下好吗？”病人不语，面色通红，而且马上痛哭起来。此案例中，病人的（）未得到保障。