vb实现文本的保存，和读取

来源：百度知道 编辑：UC知道 时间：2024/05/28 17:28:39
做了个简易的记录数据的vb windows应用程序，窗口中添加了许多lable，和textbox空间，我是把每个textbox里输入的内容再赋予lable显示的，我想知道当我准备关闭这个程序之前，想把lable的内容保存下来，到下次打开这个程序能够显示关闭前lable的状态该怎么做

建议使用注册表文件，比较简单。
关闭前用savesetting语句保存。

打开时先用getsetting 语句读取，读取后写到lable中即可。

deletesetting是删除的语句。

举例
SaveSetting "MyApp","Startup", "Left", "asdfsad"
Debug.Print GetSetting("MyApp", "Startup","Left", "25")
上面第一条在MYAPP,STARTUP,LEFT位置保存值asdfsad.
第二句在debug窗口中显示改位置的值，如该位置没有值，就返回25.

以上方法达到了你的效果，好的程序在不要的时候是不会给系统留下垃圾的，所以，你最好在使用者不在使用该程序前，执行DeleteSetting "MyApp",删除注册表垃圾信息

文件操作学过么？可以参考书，打字可要累死我了

不用注册表那么麻烦，但你必须得学过文件操作，不会也不怕，简单，我假设你的label是label1,你在代码区加入以下
''这时关闭时保存信息
Private Sub Form_Unload(Cancel As Integer)
open "c:\label1.txt" for output as #1
print #1, label1.captiong
close #1
End Sub
''这时运行时加载信息
Private Sub Form_Load()
dim a as string
open "c:\label1.txt" for input as #1
line input #1, a
close #1
lab