下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段。Private Sub Form. Click()Dim i As IntegerOpen"Num.txt" For Output As#1For i=1 To 8______Next iClose#1End 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 Sub

A.print#1,i

B.input #1,I

C.print#1

D.input#1


相关考题:

列程序的功能是:将数据1,2,…,10写入顺序文件Base.txt中,请填空。Private Sub Form_Click()Dim i As IntegerOpen 【11】 As #1For i=1 To 10【12】Next iClose #1End Sub

下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请补充完整。Private Sub Form_Click()Dim i As IntegerOpen "Num.txt"For Output As #1For i=1 To 8【15】Next iClose #1End Sub

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

(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,1,…,8写入顺序文件Num.txt中,请选择正确的程序段( )。Private Sub Form_Click()Dim i As IntegerOpen"Num.txt"For Output As #1For i=1 To 8______Next iClose #1End 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,iB.input #1,iC.print #1D.input #1