语句“open"c:\dat.txt"for output”用于打开一个顺序文件,该语句的一个重要错误是没有()。
A.指定文件名
B. 指定文件号
C. 指定打开方式
D. 指定打开类型
A.指定文件名
B. 指定文件号
C. 指定打开方式
D. 指定打开类型
在窗体上画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)=______Then
Close 1
End
Else
Write#1,______
Text1.Text=""
End If
End If
End Sub
以上程序的功能是,在D盘temp目录下建立1个名为dat.txt的文件,在文本框中输入字符,每次按回车键(回车符的ASCII码是13)都把当前文本框中的内容写入文件dat.txt,并清除文本框中的内容;如果输入“END”,则结束程序。请填空。
(12)在窗体上画一个文本框,名称为 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)
If KeyAscii=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 文件夹下建立一个名为 dat.txt 的文件,在文本框中输入字符,每次按
回车键都把当前文本框中的内容写入文件 dat.txt,并清除文本框中的内容:如果输入“END”,则不写入
文件,直接结束程序。请填空。
A.f=open('E:/test.txt','w') f.write ('OK')
B.f=open('E:/test.txt','r') f.write ('OK')
C.f=open('E:\test.txt','w') f.write ('OK')
D.f=open('E:\test.txt','r') f.write ('OK')
A、F = "c:\t1.txt" Open F For Input As #2
B、F ="c:\t1.txt" Open "F" For Input As #2
C、Open c:\t1.txt For Input As #2
D、Open "c:\t1.txt" For Output As #2
A.1
B.2
C.3
D.并不会报错
(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 ” ,则结束程序。请填空。
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!