近年来，“X卧底”窃听软件、手机丢失遭遇艳照门、CIQ偷窥用户隐私、CSDD等网站用户账户信息泄露等一系列的隐私泄露事件，频频发生，令人堪忧。上述行为[     ]

A．是一种侵犯公民隐私权的行为，要依法整治

B．侵犯了公民的人格尊严权，是严重违法行为

C．不具有严重社会危害性，人们可以置之不理

D．不属于违法犯罪行为，我们不应该小题大作

下列程序的执行结果为( )。
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