单项选择题

下列程序的功能是：将数据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