为从当前文件夹中读入文件File1.txt,某人编写了下面的程序:Private Sub Command1_Click( )OpenFile1.txtFor Output As20Do While Not EOF(20)Line Input20,ch$Print chLoopClose20End Sub程序调试时,发现有错误,下面的修改方案中正确的是( )。A.在Open语句中的文件名前添加路径B.把程序中各处的“20”改为“1”C.把Print ch语句改为Print20,chD.把Open语句中的0utput改为Input
为从当前文件夹中读入文件File1.txt,某人编写了下面的程序:
Private Sub Command1_Click( )
Open"File1.txt"For Output As20
Do While Not EOF(20)
Line Input20,ch$
Print ch
Loop
Close20
End Sub
程序调试时,发现有错误,下面的修改方案中正确的是( )。
A.在Open语句中的文件名前添加路径
B.把程序中各处的“20”改为“1”
C.把Print ch语句改为Print20,ch
D.把Open语句中的0utput改为Input
相关考题:
(33)执行语句Open"Test.Dat"For OutInput As#1,系统 A.将C盘当前文件夹下名为SDat.dat文件的内容读入内存B.在C盘当前文件夹下建立名为SDat.dat的顺序文件C.将内存数据存放在C盘当前文件夹名为SDat.dat的文件中D.将某个磁盘文件的内容写入C盘当前文件夹下名为SDat.dat的文件中
执行语句Open"C:\SDat.dat"For Input As#2后,系统( )。A.将C盘当前文件夹下名为SDat.dat文件的内容读入内存B.在C盘当前文件夹下建立名为SDat.dat的顺序文件C.将内存数据存放在C盘当前文件夹下名为SDat.dat的文件中D.将某个磁盘文件的内容写入C盘当前文件夹下名为SDat.dat的文件中
为了从当前文件夹中读人文件Filel.txt,某人编写了下面的程序:Private Sub Commandl_Click()Open“Filel.txt”For Output As#20Do While NOt EOF(20)Line Input#20,ch$print chLoopClose#20End Sub程序调试时,发现有错误,下面的修改方案中正确的是A.在Open语句中的文件名前添加路径B.把程序中各处的“20”改为“1”C.把Print ch语句改为Print#20,chD.把Open语句中的Output改为Input
执行语句Open"C:\StuData.dat"For lnput As#2后,系统A.将C盘当前文件夹下名为StuData.dat的文件的内容读入内存B.在C盘当前文件夹下建立名为StuData.dat的顺序文件C.将内存数据存放在C盘当前文件夹下名为StuData.dat的文件中D.将某个磁盘文件的内容写入C盘当前文件夹下名为StuData.dat的文件中
执行语句Open"C: \StuData.dat"For 1nput As#2后,系统A.将C盘当前文件夹下名为StuData.dat的文件的内容读入内存B.在C盘当前文件夹下建立名为StuData.dat的顺序文件C.将内存数据存放在C盘当前文件夹下名为StuData.dat的文件中D.将某个磁盘文件的内容写入C盘当前文件夹下名为StuData.dat的文件中
为丫从当前文件夹中读入文件File1.txt,某人编写了下面的程序: Private Sub Command1_Click( ) Open"File1.txt"For Output As#20 Do While Not EOF(20) Line Input#20,ch$ Print ch Loop Close#20 End Sub 程序调试时,发现有错误,下面的修改方案中正确的是( )。A.在Open语句中的文件名前添加路径B.把程序中各处的“20”改为“1”C.把Print ch语句改为Print#20,chD.把Open语句中的0utput改为Input
为丫从当前文件夹中读入文件File1.txt,某人编写了下面的程序:Private Sub Command1_Click( )OpenFile1.txtFor Output As#20Do While Not EOF(20)Line Input#20,ch$Print chLoopClose#20End Sub程序调试时,发现有错误,下面的修改方案中正确的是( )。A.在Open语句中的文件名前添加路径B.把程序中各处的“20”改为“1”C.把Print ch语句改为Print#20,chD.把Open语句中的0utput改为Input
(34)为了从当前文件夹中读入文件File l .txt,某人编写了下面的程序:Private Sub Command 1_CLick()Open"File l .txt" For Output As #20Do While Not EOF(20)Line Input #20, ch$Print chLoopClose #20End Sub程序调试时,发现有错误,下面的修改方案中正确的是A)在Open语句中的文件名前添加路径B)把程序中各处的"20"改为"1"C)把Print ch语句改为Print #20, chD )把Open语句中的Output改为Input
修改期中考试程序,添加3个菜单项,分别是“读入”和“保存”、“另存”功能,选“读入”时提示输入文件名,并读入文件中多边形数据,选“保存”功能可以保存当前多边形数据到当前读入的文件,若没有当前读入文件,则提示输入文件名再保存,选“另存”功能提示输入文件名,并保存当前多边形数据到该文件。