窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据: Private Sub Command1_Click() Dim s1 As String.a2 As String Open"c:\d4.

admin2019-04-29  40

问题 窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:
Private Sub Command1_Click()
Dim s1 As String.a2 As String
Open"c:\d4.dat"For Append As #3
Line Input #3.s1
Line Input #3.s2
Text1.Text=s1+s2
Close
End Sub
该程序运行时有错误,应该进行的修改是

选项 A、将Open语句中的For Append改为For Input
B、将Une Input改为Line
C、将两条Line Input语句合并为Line:Input #3,s1,s2
D、将Close语句改为Close #3

答案A

解析 文件打开方式中的Append意味着打开的文件是顺序输出方式,也就是说打开文件是为了向其中写入数据的而不是要读出数据。因此Open"c:\d4.dat"For Append As #3应该改为Open"c:\d4.dat"For Input As #3。所以A选项正确。Clsoe语句中的文件号可以省略,这时会关闭所有打开的文件。
转载请注明原文地址:https://jikaoti.com/ti/3mN0FFFM
0

最新回复(0)