患者，女，44岁，一周前获知自己患肺癌，情绪变化很大，患者常向医务人员及家属发脾气，对医务人员工作十分挑剔，此时患者的心理反应是( )

A．接受期
B．忧郁期
C．协议期
D．愤怒期
E．否认期

执行下列程序后，变量a的值为( )。
Dim i As Integer
Dim a As Integer
a=0
For i=1 To 100 Step 2
　　a=a+1
Next i

A．1

B．10

C．50

D．100