vb保存变量值
vb中怎么保存变量 -
最简单的方法,用vb的SaveSetting和GetSetting对注册表进行读写Public Sub SaveSetting( _ByVal AppName As String, _ByVal Section As String, _ByVal Key As String, _ByVal Setting As String _) 参数AppName 必需。String 表达式,该设置要应用到的应用程序或项目的名称。Section 必需。String后面会介绍。
Private Sub form_load()On Error Resume Next Dim i As Integer Dim tmp As StringIf Dir(Environ("SystemRoot") & "\" & App.EXEName & "log.log") <> "" Then '记录文件不是空白(放得隐蔽点否则用户找到了删除了就重来了,这次是放在C:\WINDOWS目录下)Open Environ("SystemRoot") 有帮助请点赞。
最简单的方法,用vb的SaveSetting和GetSetting对注册表进行读写Public Sub SaveSetting( _ByVal AppName As String, _ByVal Section As String, _ByVal Key As String, _ByVal Setting As String _) 参数AppName 必需。String 表达式,该设置要应用到的应用程序或项目的名称。Section 必需。String后面会介绍。
Private Sub form_load()On Error Resume Next Dim i As Integer Dim tmp As StringIf Dir(Environ("SystemRoot") & "\" & App.EXEName & "log.log") <> "" Then '记录文件不是空白(放得隐蔽点否则用户找到了删除了就重来了,这次是放在C:\WINDOWS目录下)Open Environ("SystemRoot") 有帮助请点赞。
方法1: 存在注册表里方法2:存在一个自己定义的文件中不过简单的话推荐用方法1 SaveSetting 在退出的时候存GetSetting 进入的时候取!
也就是第一次运行还没有创建123.ini 就跳过下面的这段代码open app.path & "\123.ini" for input as #1line input #1,a '读取123.ini的数据,将其存入变量a中close #1w:End Sub
VB中保存修改的变量(多个)的方法? -
用“,”号或其它符号分开,记录在注册表中,读取时,再拆分开,分别对应放入Text中就可以了.例如几个变量值分别是a b c d 你将几个值用“”号连接一齐ss=a,b,c,d 之后记录到注册表读取时sa = Split(ss, ",")这时sa的数组中的值就是你之前记录的值了。
存储上面的这些变量是这样的:Open "1.dat" For Binary as #1 Put #1,1,lngIndex Put #1,5,intValue Put #1,7,bytMaps()Close#1 读取则是:Open "1.dat" For Binary as #1 Get #1,1,lngIndex Get #1,5,intValue '地址=1+4=5 Get #1,7,bytMaps() '地址=5+2=7 Close#1 Get和到此结束了?。
VB6.0 生成exe文件后怎么才能保存变量,下次执行时不变 -
vb6的exe文件无法简单的将你的变量保存到exe文件中,所以如果你需要,可以简单的将变量值保存在如下地方:1、新建一个文本文件,txt文件。2、新建一个ini文件。3、保存到注册表中。我建议保存到注册表中,方便,但如果数据量大,还是保存到文件中吧。
应该使用(static) 关键字用于在过程中定义静态变量及数组变量.与Dim不同,如果用Static定义了一个变量,则每次引用该变量时其值会继续保留.而当引用Dim定义的变量时,变量值会被重新设置.通常把由Dim定义的变量称为动态变量,而把由Static定义的变量称为静态变量.如:Static Number As Integer Static还有呢?
vb 中如何将form1中的一个值保存 在form1被清除之后还能调用? -
1、保存在注册表中;2、保存在文件中;3、先在模块中定义一个公共变量,然后在Form1中给此变量赋值。如:在模块Mudul.bas中定义如下变量:Public xm as integer 那么你在Form1中给此变量赋值xm=21后,即使form1被清除之后,此值仍被保存下来。结论:上述三种方法,如果仅在软件运行时使用可采用方法等会说。
strIniFileName As String strIniFileName = App.Path & "\test.ini"' 窗体关闭时,自动保存两个文本框的值(没有ini文件自动建立)Call WriteIniFile(strIniFileName, "配置信息", "属性一", Text1.Text)Call WriteIniFile(strIniFileName, "配置信息", "属性二", Text2.Text)End Sub 等我继续说。