vb open语句的 文件打开方式都有哪些？

VB6.0Open语句的文件打开有 Append、Binary、Input、Output、或 Random 方式。

Append，对顺序文件追加。

Binary，允许读写 *** 作的二进制方式

Input，从已打开的顺序文件中读出数据并将数据指定给变量。

Output，顺序输出方式打开文件。

Random，以随机方式打开文件

各方式Open 语句示例

本示例示范 Open 语句的不同用法来做到文件的输出与输入。

下列代码以顺序输入模式打开 TESTFILE 文件。

Open "TESTFILE" For Input As #1

' 若要以其他方式打开文件，必需先关闭此文件。

Close #1

下列代码以只允许写 *** 作的二进制方式打开文件。

Open "TESTFILE" For Binary Access Write As #1

' 若要以其他方式打开文件，必需先关闭此文件。

Close #1

下列代码以随机方式打开文件，文件中含有用户自定义数据类型 Record 的记录。

Type Record   ' 定义用户自定义数据类型。

  ID As Integer

  Name As String * 20

End Type

Dim MyRecord As Record   ' 声明变量。

Open "TESTFILE" For Random As #1 Len = Len(MyRecord)

' 若要以其他方式打开文件，必需先关闭此文件。

Close #1

下列代码以顺序输出方式打开文件；任何过程都可以读写该文件。

Open "TESTFILE" For Output Shared As #1

' 若要以其他方式打开文件，必需先关闭此文件。

Close #1

下列代码以只允许读的二进制方式打开文件；其他过程不可以读该文件。

Open "TESTFILE" For Binary Access Read Lock Read As #1

VE be open不会自己去创建文件夹，文件夹只有你自己创建了才可以，通常情况下你用电脑新建一个文件夹，他才会出现其他的应用和软件是不会自己去创建文件夹的，希望我的建议对你有帮助，祝您生活愉快，每天开心，工作顺利，万事如意

Private Sub Command2_Click()

plcW = Module2.PLCWriteCount

'保存参数

'On Error GoTo errH

CommonDialog1.Filter = "ldq| *.ldq"

CommonDialog1.ShowSave

Dim Freenum As Integer

Print CommonDialog1.FileName

Freenum = FreeFile

close all'加上这句,还不行就重启下电脑- -|||一定行

Open CommonDialog1.FileName For Output As Freenum

Dim bFor As Integer

For bFor = 0 To (Module2.HeatCount * 2 + 6 + plcW)

Print #Freenum, Module2.RecipeDatat(bFor)

Next bFor

Close #Freenum

Exit Sub

'errH:

'Exit Sub

End Sub

---