（VB）怎样保存DAT文件？

分类: 电脑/网络 >>程序设计 >>其他编程语言

问题描述:

VB上机考试中，要求“存盘时不得改变文件名和文件夹，相应的 dat文件也保存到考生文件夹下，否则没有成绩。”请问怎样拍悄保存这个DAT文件呢？比如说一个数据文件stud1.dat，存放考生的考号、数吵姓名、成绩袭毕渣。那在运行程序后，按VB工具栏中的保存按扭是不是就保存了DAT文件呢？谢谢！

解析:

Dim 你想输入的数据 As String

Open "C:\Temp\stud1.dat" For Output As #1

Print #1,你想输入的数据

Close #1

这样如果原来没有的话，在C:\Temp下就创建了一个名为stud1.dat的文件。

按VB工具栏中的保存按扭只是把当前的工程保存下来而已，并不是保存为dat文件

VB可通过Open

语句，用Print

#

语句将格肆蠢式化显示的批处理行命令数据写入顺序文件中。

Open

语句，能够对文件输凯谈入/输出

(I/O)。

Print

#

语句，将格式化显示的数据写入顺序文件中。

Output关键字，如果

pathname

指定的文件不存在，那么，在用

Append、Binary、Output、或

Random

方式打开文件时，可以建立这一文件。

实现代码，在D盘根目录生成一个将D盘根目录下的文件复制到E盘根目录的BAT批处理文件。

Private Sub Form_Click()

Open "D:\Copy.bat" For Output As #1

Print #1, "Copy D:\盯雹碰*.* E:\*.*"

Close #1

End Sub

如果虚姿型只是在VB中打开dat文件可以用Open语句来打开，VB中的Open是打差猜开文件并按要求装载数据，具体语法：

Open

pathname

For

mode

[Access

access]

[lock]

As

[#]filenumber

[Len=reclength]

实例：打开d:\demo.dat

Dim

TextLine

Open

"d:\demo.dat"

For

Input

As

#1

\'

打开文件。

Do

While

Not

EOF(1)

\'

循环至文件尾册塌。

Line

Input

#1,

TextLine

\'

读入一行数据并将其赋予某变量

---