在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：

Public x As Integer

Private Sub Command1_Click()

x＝10

Call s1

Call s2

MsgBox x

End Sub

Private Sub s1()

x＝x+20

End Sub

Private Sub s2()

Dim x As Integer

x＝x+20

End Sub

窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。

A．10

B．30

C．40

D．50

补写出下列名篇名句中的空缺部分。

（1）亦余心之所善兮，______________。（屈原《离骚》）

（2）为天下笑者，何也？______________。（贾谊《过秦论》）

（3）______________，引喻失义，以塞忠谏之路也。（诸葛亮《出师表》）

（4）仰观宇宙之大，______________，所以游目骋怀，足以极视听之娱，信可乐也。（王羲之《兰亭集序》）

（5）渔舟唱晚，______________；雁阵惊寒，生断衡阳之浦。（王勃《滕王阁序》）