题目内容
（请给出正确答案）
如果结果不匹配，请 联系老师 获取答案
更多“（34）设有语句Open"C:\Test.Dat"For O…”相关的问题
设有语句Open "C:\Test.Dat" For OutPut As #1，则下列叙述中错误的是()。
A．该语句只能打开C盘根目录下一个已存在的文件Test.Dat
B．当C盘根目录下没有该文件时，该语句在C盘根目录下建立名为Test.Dat的文件
C．该语句建立文件的文件号为1
D．执行该语句后，就可以通过Print#语句向Test.Dat文件中写入信息
设有语句 Open "c:\Test.Dat"For Output As #1 则以下错误的叙述是 ______。
A．该语句打开C盘根目录下一个已经存在的文件Test.Dat
B．该语句在C盘根目录下建立一个名为Test.Dat的文件
C．该语句建立的文件的文件号为1
D．执行该语句后，就可以通过Print #语句向文件Test.Dat中写入信息
A.Input#1 a
B.Write#1 a
C.Put#1，a
D.Get#1，a
假定用下面的语句打开文件：
Open“Filel．txt”for Input As#1
则不能正确读文件的语句是
A．Input#l，ch$
B．Line Input#1，ch$
C．ch$=Input$(5，#1)
D．Read#1，ch$
假定用下面的语句打开文件： Open"Filcl．txt"For Input As#1 则不能正确读文件的语句是（）。
A.Input#1，ch$
B.Line Input#1，ch$
C.ch$一Input$(5，#1)
D.Read#1，ch$
A.Private Sub Command1 Click（） Dim B AS Books Open"Person txt"For Output As#1 Name=InputBox(”输入姓名”) relNum=lnputBox(”输入电话号码”) Wlite#1 B Name，B TelNum Ch,se#1 End Sub
B.Private Sub Command1 Click（） Dim B AS Books Open"Person txt"For Input As#1 ＞Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Print#1，B．Name，B．TelNam Close#1 End Sub
C.Private Sub Command1 Click（） Dim BAS Books Open"Person txt"For Output As#1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Write#1，B Close#1 End Sub
D.Private Sub Commandl Click（） Open"Person txt"For Input As#1 Name=lnputBox("输入姓名") TelNum=lnputBox("输入电话号码") Prim#1 Name TelNum Close#1 End 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 Sub
A．print#1,i
B．input #1,I
C．print#1
D．input#1
（11 ）在窗体上画 1 个文本框，名称为 Text1 ，然后编写下列事件过程：
Private Sub Form_Load()
Open"d:\temp\dat.txt"For Output As#1
Text1.Text= “ “
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
lf 【 13 】 =13 Then
If UCase(Text1.Text)= 【 14 】 Then
Close 1
End
Else
Write#1 , 【 15 】
Text1.Text=" "
End If
End If
End Sub
以上程序的功能是：在 D 盘 temp 目录下建立 1 个名为 dat.txt 的文件，在文本框中输入字符，每次按回
车键（回车符的 ASCII 码是 13 ）都把当前文本框中的内容写入文件 dat.txt ，并清除文本框中的内容 ； 如
果输入 “ END ” ，则结束程序。请填空。
下面对语句的功能说明中错误的是Open"Text.Dat"For Output As #FreeFile
A．以顺序输出模式打开文件Text.Dat
B．如果文件Text.Dat不存在,则建立一个新文件
C．如果文件Text.Dat已存在,则打开该文件,新写入的数据将增添到该文件中
D．如果文件Text.Dat已存在,则打开该文件,新写入的数据将覆盖原有的数据
