如何用VB把所有变量写入在一个文件中,在运行时自动读取变量值且应用到窗体上!

把窗体上的i,q,w等变量写在一个文件中,在下次运行时自动读取相应变量值到窗体上,谢谢各位大侠!其实就相当于游戏的存档!回答好的加分!... 把窗体上的i,q,w等变量写在一个文件中,在下次运行时自动读取相应变量值到窗体上,谢谢各位大侠!其实就相当于游戏的存档!
回答好的加分!
展开
 我来答 举报
LuoJi_1995
2009-09-05 · TA获得超过1714个赞
知道小有建树答主
回答量:613
采纳率:0%
帮助的人:767万
展开全部
有两种方法:
1、文件存取
'读取
On Error Resume Next
Err.Clear
Open "record.dat" For Input As #1
If Err.Number = 0 Then
Input #1, i, q, w
'输入
Else
'其他初始化
End If
'然后输出到窗体上
Close #1
Err.Clear

'存入
On Error Resume Next
Err.Clear
Open "record.dat" For Output As #1
If Err.Number = 0 Then
Print #1, i, q, w
'输出
End If
Close #1
Err.Clear

注意:
这样做的好处 - 方便、一目了然,备份信息简单,只要复制record.dat即可
这样做的坏处 - 有的时候受权限影响

2、注册表存取

'存入
SaveSetting "我的程序","保存设置","i",i
SaveSetting "我的程序","保存设置","q",q
SaveSetting "我的程序","保存设置","w",w

'读取
i=GetSetting("我的程序","保存设置","i","i的默认值")
q=GetSetting("我的程序","保存设置","q","q的默认值")
w=GetSetting("我的程序","保存设置","w","w的默认值")
'其中默认值是你自己定的

注意:
这样做的好处 - 不受权限影响、存取方便、有默认值
这样做的坏处 - 迁移性不好,即想要备份信息困难,但是可以用输出一个注册表文件来弥补
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式