跪求,在vb环境中编译生成exe后的程序,退出程序后保留某个变量值或某个控件的属性,真么才能做到啊?

就是说在程序中有一个按钮PrivateSubCommand1_Click()Command1.Enabled=Falseendsub在程序退出后在运行,command1的... 就是说在程序中有一个按钮
Private Sub Command1_Click()
Command1.Enabled =False
end sub
在程序退出后在运行,command1的enabled的属性仍为flase,但第一次进入时要为true,按钮才失去作用,以后在运行程序都是这样
再麻烦一下第一次打开程序label1的内容能永久保留
展开
 我来答
newkedison
2009-05-12 · TA获得超过734个赞
知道小有建树答主
回答量:234
采纳率:0%
帮助的人:409万
展开全部
Option Explicit
' SaveSetting和GetSetting用于快速的读写注册表
' 下面的"Save", "Button", "Enable", "False"这四个字符串,都是可以自己随便起的,只要保证
' "Save", "Button", "Enable", 这三个字符串,读的时候和写的时候是一样的
' "False"或者"True"是保存和读取的设置,根据这个值进行不同的处理即可

Private Sub Command1_Click()
Command1.Enabled = False
SaveSetting "Save", "Button", "Enable", "False" '保存设置到注册表
End Sub

Private Sub Command2_Click()
Command1.Enabled = True
SaveSetting "Save", "Button", "Enable", "True" '保存设置到注册表
End Sub

Private Sub Form_Load()
Dim s As String

s = GetSetting("Save", "Button", "Enable", "True") '从注册表读取设置
Command1.Enabled = (s = "True") '判断保存的设置是不是"True",如果是的话,就设置按钮属性为True
End Sub
zeropower_ts
2009-05-15 · TA获得超过125个赞
知道答主
回答量:128
采纳率:0%
帮助的人:0
展开全部
Private Sub Command1_Click()
Command1.Enabled =False
open setup.txt for output as #1
print #1,command.enabled
close #1
sub end

Private Sub Form_Load()
open setup.txt for input as #1
line input #1,a
command1.enabled=a

End Sub

不太明白你的补充???能具体说下吗》?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
张佳文1
2009-05-12
知道答主
回答量:20
采纳率:0%
帮助的人:0
展开全部
11
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
Cracker_love
2009-05-12 · TA获得超过102个赞
知道小有建树答主
回答量:672
采纳率:0%
帮助的人:543万
展开全部
保存到INI文件里面或者注册表里面
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式