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

（1）举酒属客，诵明月之诗，               。（苏轼《赤壁赋》）

（2）钉头磷磷，                     。    （杜牧《阿房宫赋》）

（3）皇览揆余初度兮，            。     （屈原《离骚（节选）》）

（4）                   ，虽九死其犹未悔。（屈原《离骚（节选）》）

（5）凡四方之士无不有过而拜且泣者，              。（张溥《五人墓碑记》）

（6）       ，择善而从之。            （魏征《谏太宗十思疏》）

（7）卒相与欢，            。     （司马迁《廉颇蔺相如列传（节选）》）

（8）留连戏蝶时时舞，               。 （杜甫《江畔独步寻花七绝句（其六）》）

在窗体上画一个命令按钮，然后编写如下程序　　Private Sub Command4 Click()　　　　Dim a As Integer，b As Integer　　　　a=1　　　　b=2　　　　Print N(a，b)　　End Sub　　Function N(x As Integer，y As Integer)As Integer　　　　N=IIf(x＞y，x，y)　　End Function　　程序运行后，单击命令按钮，输出结果为（ ）。

A．l

B．2

C．5

D．8