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

(1) 且臣少仕伪朝，历职郎署。             ，              。 (李密《陈情表》)

(2)覆杯水于坳堂之上，           。置杯焉则胶，            。 (庄子《逍遥游》)

(3)         ，         ，定乎内外之分，辩乎荣辱之境，斯已矣。(庄子《逍遥游》)

(4) 青山隔送行，                ，                    。(王实甫《长亭送别》)

以下程序的功能是：生成20个200到300之间的随机整数，输出其中能被5整除的数并求出它们的和。请填空。
Private Sub Command1_Click( )
For i=1 To 20
x=Int( 【6】 *100+200)
If 【7】 =0 Then
Print x
S=S+ 【8】
End lf
Next i
Print"Sum="；S
End Sub