经济学家以及政治哲学家之思想，其力量之大，往往出乎常人意料。事实上统治世界者，就只是这些思想而已。许多实行者自以为不受任何学理之影响，却往往当了某个已故经济学家之奴隶。狂人执政，自以为得天启示，实则其狂想之来，乃得自若干年以前的某个学人。我很确信，既得利益之势力，未免被人过分夸大，实在远不如思想之逐渐侵蚀力之大。
通过这段文字，作者想表达的主要观点是( )。

A．政治家是思想家的奴隶
B．狂人执政受学理的影响较小
C．既得利益的势力易被夸大
D．思想的影响力非常大

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Dim SW As Boolean
Function func(X As Integer)As Integer
　　If X＜20 Then
　　　　Y=X
　　Else
　　　　Y=20+X
　　End If
　　 func=Y
End Function
Private Sub Form_MouseDown(Button As Integer,_Shift As Integer，X As Single，Y As Single)
　　SW=False
End Sub
Private Sub Form_MouseUp(Button As Integer,_Shift As Integer，X As Single，Y As Single)
　　SW=True
End Sub
Private Sub Command1_Click()
Dim intNum As Integer
　　intNum=InputBox("")
　　If SW Then
　　　　Print func(intNum)
　　End If
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为

A．输出0

B．输出25

C．输出45

D．无任何输出