网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

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


参考答案

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