VB Open语句有没有既能读取又能写入的类型？

比如：Open "F:\Aha.txt" For Append As #1 是追加写入。不覆盖之前的。
Open "F:\Aha.txt" For Input As #1 单纯读取
Open "F:\Aha.txt" For Output As #1 覆盖型写入
那么，有没有既能读取又能写入的类型？那样要方便许多

二楼的：Open "F:\Aha.txt" For Append Access Read Write As #1 这样用print写入就说文件模式错误。
Open "F:\Aha.txt" For Binary Access Read Write As #1 这样用Line Input 又说文件模式错误。
要么不能读。要么不能写。还是不能既可以读、又可以写。。

以二进制方式打开文件，可以跟Access关键字，确定文件操作方式。
以下摘自MSDN
access 可选。关键字，说明打开的文件可以进行的操作，有 Read、Write、或 Read Write 操作。
例如：

Open "TESTFILE" For Binary Access Read Write As #1
-----------------------------------
Open "F:\Aha.txt" For Append Access Read Write As #1
Open "F:\Aha.txt" For Binary Access Read Write As #1

------------------------------------
Open "F:\Aha.txt" For Binary Access Read Write As #1 '以二进制方式打开文件

Dim str(3) As Byte '读取4个字节

'写
Put #1, , "abcdefghijk"

Seek #1, 1 '定位到第一个字节

'读
Get #1, , str

Close '关闭所有文件

MsgBox StrConv(str, vbUnicode) '显示读取的字符串

设置text的multiline属性为true 用line input做 private sub command1_click() commondialog1.filter = "文本文件(*.txt)|*.txt" commondialog1.showopen dim a as string open commondialog1.filename for input as #1 do while not eof(1) line input #1, a text1.text =text1.text + a + vbcrlf loop close #1 end sub 搞定～

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息