列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。 PrivateSubForm_Click（

列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。

Private Sub Form_Click（）

Dim i As Integer

Open 【11】 As #1

For i=1 To 10

【12】

Next i

Close #1

End Sub