下列程序执行后，变量x的值为( )。 Dim a，b，c，d As Single Dim x As Single a=10 b=30 c=400 If b＞a Then d=a：a=b：b=d End If If b＞c Then x=b Else If a＞c Then x=c Else x=a End If

A．单击窗体上没有控件处，可把活动控件变为不活动控件
B．双击任一个控件内部，可激活该控件的代码窗口
C．双击一个控件内部，可把活动控件变为不活动控件
D．拖动一个活动控件四周的控制小方块可缩放控件

A．变量Y的值与Y+1的值相等
B．将变量Y的值存到Y+1中去
C．将变量Y的值加1后赋值给变量Y
D．变量Y的值为1