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

Private Sub Form_Click（）

D．im i As Integer

Open (11) As #1

F．or i=1 To 10

(12)

Next i

C．lose #1

E．nd Sub

[主观题]下列程序的功能是：将数据1，2，…，8写入顺序文件Num.txt中，请补充完整。Private Sub Form_Click（）D．im i As IntegerOpen "Num.txt"For Output As #1F．or i=1 To 8(15)Next iC．lose #1E．nd Sub

[单选题]（34）下列程序的功能是：将数据1,2,…,8写入顺序文件Num.txt中，请选择正确的程序段。 Private Sub For_Click() Dim i As Integer Open "Num.txt"For Output As #1 For i=1 To 8 Next i Close #1 End SubA.Print #1,i B.input #1,I C.Print #1 D.input #1

[单选题]下列程序的功能是：将数据1，2，…，8写入顺序文件Num.txt中，请选择正确的程序段。Private Sub Form. Click()D．im i As IntegerOpen"Num.txt" For Output As#1F．or i=1 To 8______Next iC．lose#1E．nd SubA．print#1,iB．input #1,IC．print#1D．input#1

[单选题]下列程序的功能是：将数据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 SubA．print #1，iB．input #1，iC．print #1D．input #1

[单选题]下列程序的功能是：将数据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 SubA．print #1,iB．input #1,iC．print #1D．input #1

[单选题]下列程序的功能是：将数据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 SubA．print #1,iB．input #1,iC．print #1D．input #1

[单选题]下列程序的功能是：将数据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 SubA.print#1,i B.input#1,i C.print#1 D.input#1

[单选题]下列程序的功能是：将数据1，1，…，8写入顺序文件Num.txt中，请选择正确的程序段( )。Private Sub Form_Click()D．im i As IntegerOpen"Num.txt"For Output As #1F．or i=1 To 8______Next iC．lose #1E．nd SubA．print#1,iB．input#1,IC．print#1D．input#1

[单选题]向顺序文件Temp.txt中写入1,2,3这3个数。在程序中加入以下语句的那项可以使程序功能完整。Private Sub Command1_ClickOpen"c:/Temp.txt",Output As #1F．or i=0 To 3NextC．lose #1E．nd SubA．Print #1,Temp.txtB．Get #1,iC．Print #1,iD．Unit #1,i

[单选题]向顺序文件Temp.txt中写入1，2，3这3个数。在程序中加入以下语句的那项可以使程序功能完整。 Private Sub Command1_Click() Open"c:/Temp.txt"，Output As #1 For i=0 To 3 ______ Next Close #1 End SubA．Print #1，Temp.txtB．Get #1，iC．Print #1，iD．Unit #1，i