在日常生活中，如出现下面的行为，请你判断其中属于侵犯他人姓名权的是[     ]

A．强迫他人使用某个姓名

B．假用他人的姓名签订合同

C．盗用他人的姓名实施不正当的行为

D．对获得荣誉称号的人进行挖苦、讽刺和打击

单击一次命令按钮之后，下更程序代码的执行结果为______ 。
Public Sub Proc(a() As Integer)
Static i As Integer
Do
a(i) = a(i) + a(i + 1)
i=i+1
Loop While i ＜ 2
End Sub
Private Sub Command1_Cliek()
Dim m As Integer
Dim i As Integer
Dim x(10) As Integer
For i = 0 To 4
x(i) = i + 1
Next i
For i = 1 To 2
Call Proc (x)
Next i
For i = 0 To 4
Print x(i);
Next i
End Sub

A) 3 4 7 5 6

B) 3 5 7 4 5
C) 1 2 3 4 5

D) 1 2 3 5 7