按原文默写（共6分，每空1分）

小题1:塞下秋来风景异，                      。（范仲淹《渔家傲 秋思》）

小题2:                        ，西北望，射天狼。（苏轼《江城子 密州出猎》）

小题3:了却君王天下事，                    。（辛弃疾《破阵子 为陈同甫赋壮词以寄之》）

小题4:                       ，只有香如故。（陆游《卜算子• 咏梅》）

小题5:莫道不消魂，帘卷西风，                    。（李清照《醉花阴》）

小题6:诗人词客最喜春天，刘方平在《月夜》中就表达了对春的活力的赞美，“今夜偏知春气暖，                             ”。

下列程序的功能是：将数据1，2，…，8写入顺序文件Num．txt中，请补充完整。　　Private Sub Form_Click() 　　　　Dim i As Integer　　　　Open"Num．txt"For Output As #1　　　　For i=1 To 8　　　　【 】 　　　　Next i　　　　Close #1　　End Sub