[单选题]

为从当前文件夹中读入文件File1.txt,某人编写了下面的程序:

Private Sub Command1_Click( )

Open"File1.txt"For Output As20

D.o While Not EOF(20)

Line Input20,ch$

Print ch

Loop

C.lose20

E.nd Sub

程序调试时,发现有错误,下面的修改方案中正确的是( )。

A.在Open语句中的文件名前添加路径

B.把程序中各处的“20”改为“1”

C.把Print ch语句改为Print20,ch

D.把Open语句中的0utput改为Input

参考答案与解析:

相关试题

(34)为了从当前文件夹中读入文件File l .txt,某人编写了下面的程序:

[单选题](34)为了从当前文件夹中读入文件File l .txt,某人编写了下面的程序:Private Sub Command 1_CLick()Open"File l .txt" For Output As #20D.o While Not EOF(20)Line Input #20, ch$Print chLoopC.lose #20E.nd Sub程序调试时,发现有错误,下面的修改方案中正确的是A.)在Open语句中的文件名前添加路径B.)把程序中各处的"20"改为"1"C.)把Pri

  • 查看答案
  • 为了从当前文件夹中读人文件Filel.txt,某人编写了下面的程序:Privat

    [单选题]为了从当前文件夹中读人文件Filel.txt,某人编写了下面的程序:Private Sub Commandl_Click()Open“Filel.txt”For Output As#20D.o While NOt EOF(20)Line Input#20,ch$print chLoopC.lose#20E.nd Sub程序调试时,发现有错误,下面的修改方案中正确的是A.在Open语句中的文件名前添加路径B.把程序中各处的“20”改为“1”C.把Print ch语句改为Print#20,chD.把

  • 查看答案
  • 为了从当前文件夹中读入文件Filetxt,某人编写了下面的程序:<br />程序:<br /><img border="0" style="

    [单选题]为了从当前文件夹中读入文件Filetxt,某人编写了下面的程序:程序:程序调试时,发现有错误,下面的修改方案中正确的是(  )。A.在Open语句中的

  • 查看答案
  • (35)某人编写了下面的程序 Private Sub Command1_Clic

    [单选题](35)某人编写了下面的程序Private Sub Command1_Click( )D.im a As Integer, b As Integera=InputBox("请输入整数")b=InputBox("请输入整数")pro apro bC.all pro(a+b)E.nd SubPrivate Sub pro(n As Integer)While (n>0)Print n Mod 10;n=n/10WendPrintE.nd Sub此程序功能是:输入 2 个正整数,反序输出

  • 查看答案
  • 某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中P

    [单选题]某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中Private Sub Commandl_Click()Open“out.txt”For Output As #2Print“Text1”C.lose #2E.nd sub调试时发现没有达到目的,为实现上述目的,应做的修改是A.把Print“Text1”改为Print#2,TextlB.把Print“Textl”改为Print TextlC.把Print“Text1”改为Write“Text1”D.把所有#2改为#1

  • 查看答案
  • 某人编写了下面的程序Private Sub Commandl_click()Di

    [单选题]某人编写了下面的程序Private Sub Commandl_click()D.im a As Integer,b As Integera=InputBox(“请输入整数”)b=InputBox(“请输入整数”)pro apro bC.allpro(a+B)E.nd SubPrivate Sub pro(n As Integer)While(n>0)Print n Mod 10;n=n\10WendPrintE.nd Sub此程序功能是:输入2个正整数,反序输出这2个数的每一位数字,再反序

  • 查看答案
  • 如果当前文件夹是root/mypaper/works/cases文件夹中的cas

    [单选题]如果当前文件夹是root/mypaper/works/cases文件夹中的case1.htm,那么要使用相对路径访问root/mypaper/works/test1.htm应该如何访问?()A ..../test1.htmB ..../works/test1.htmC ../works/test1.htmD ../../test1.htm

  • 查看答案
  • 下面的事件过程执行时,可以把TXET1文本框中的内容写到文件“file1.txt

    [主观题]下面的事件过程执行时,可以把TXET1文本框中的内容写到文件“file1.txt”中去。请填空。Prvate Sub Command1_Click()Open “file1.txt”for(6)as#1Print(7),text1.txtC.lose #1E.nd Sub

  • 查看答案
  • Windows中,选定当前文件夹中的全部文件和文件夹对象的快捷键是

    [单选题]Windows中,选定当前文件夹中的全部文件和文件夹对象的快捷键是A.Ctrl+空格键B.Ctrl+CC.Ctrl+Alt+DelD.Ctrl+XE.Ctrl+A

  • 查看答案
  • Windows中,选定当前文件夹中的全部文件和文件夹对象的快捷键是( )。

    [单选题]Windows中,选定当前文件夹中的全部文件和文件夹对象的快捷键是( )。A.Ctrl+XB.Ctrl+空格键C.Ctrl+Alt+DelD.Ctrl+CE.Ctrl+A

  • 查看答案
  • 为从当前文件夹中读入文件File1.txt,某人编写了下面的程序:Private