作业帮 > 综合 > 作业

Open "C:\SER.text" For Output read as As #1哪儿错了?

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/04/29 03:35:58
Open "C:\SER.text" For Output read as As #1哪儿错了?
总是提示“缺少AS”,但是我如果将“read "去掉,则就可以了这是怎么回事啊?
Open
在open语句中For后面可以是下面关键字:Input、Output、Append、Binary、Random.在这些关键字的后面总是连AS的.而你的语句中却是Output read as As,不知道read as是什么?把它去掉,在Output后面就是As了,当然就可以了.
再问: open 文件名 for 模块[access类型][锁定] as [#]文件名 这是open 语句的格式吧!其中output相当于模块,我是要只读存储类型,[access类型]就是read,请问为为什么不行呢?
再答: 以下是使用Open 语句的不同用法来实现文件的输出与输入的范例。 (1) 以顺序输入模式打开 client1文件,若要以其他方式打开文件,必须先关闭文件。 Open "client1" For Input As # 1 (2)以只写的二进制方式打开文件。若要以其他方式打开文件,必须先关闭此文件。 Open "client1" For Binary Access Write As #1 (3)下列代码以随机方式打开client1文件,文件中含有用户自定义数据类型 Record 的记录。若要以其他方式打开文件,必须先关闭此文件。 Type Record ' 定义用户自定义数据类型。 clientID As Integer clientName As String * 16 End Type Dim MyRecord As Record ' 声明变量。 Open "client1" For Random As # 1 Len = Len(MyRecord) (4)下列代码以顺序输出方式打开文件,任何过程都可以读写该文件。若要以其他方式打开文件,必须先关闭此文件。 Open "client1" For Output Shared As # 1 (5)下列代码以只读的二进制方式打开文件;其他过程不可以读该文件。 Open "client1" For Binary Access Read Lock Read As # 1 (6)用随机方式打开C盘上clients文件夹下的client1文件,记录长度为512字节。 Open "c:\clients\client1" For Random As # 1 Len = 512