【单选题】

下列程序执行后，变量x的值为()。

Dim a，b，c，dAs Single
Dim xAs 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．10
B．30
C．400
D．430