主题：在VB中怎么编写数据保存程序
kunyan521
[专家分：0] 发布于 2008-06-04 18:56:00
我是一个新手，我现在想编写一个程序来保存进入我的程序的数据，我这些数据都是一秒中一变的，怎么实现
回复列表 （共5个回复）
沙发
老大徒伤悲 [专家分：29120] 发布于 2008-06-04 20:18:00
Private Sub 写数据(数据 As Integer)
Open 文件名 For Append As #1
Print #1, 数据
Close #1
End Sub
然后再你要写数据的地方，写上代码：
写数据 数据名
板凳
resonance [专家分：0] 发布于 2008-06-04 22:57:00
为什么是 For Append
不是 for output 呢？
不大明白，高手指教下：）
3 楼
老大徒伤悲 [专家分：29120] 发布于 2008-06-05 08:11:00
Append是追加，在原文件的后面补充。
output是输出，从原文件的开头写起。
原因在于，前者打开文件后，将“文件指针”置于文尾；可以将数据按顺序写入文件。
而后者正好相反，所以会造成数据覆盖。具体到本例，如采用后者，则被保存的数据只有最后一次条用该过程时写入的数据了。
4 楼
okbaby [专家分：100] 发布于 2008-06-06 15:59:00
给老大做个补充：
Private Sub 写数据(数据 As Integer)
Dim fn As Integer
fn=FreeFile(0) '得到一个可用的文件号
Open 文件名 For Append As #fn
Print #fn, 数据
Close #fn
End Sub
另外如果读写速度很快的话，这样频繁的打开和关闭文件会降低效率，而且损坏硬盘。最好定义一个全局的文件号，以及打开、关闭文件的子程序，只要在第一次使用时打开，最后关闭即可。
5 楼
老大徒伤悲 [专家分：29120] 发布于 2008-06-09 22:07:00
完全同意好宝宝的两条意见。
我来回复
您所在位置：社区首页 — Visual Basic讨论区 — 在VB中怎么编写数据保存程序