请问在vba中,如何保存用户在窗体中的输入状态,以便在用户下次使用时读取
本帖最后由 作者 于 2007-6-4 12:20:38 编辑 <br /><br /> <p>请问在vba中,如何保存用户在窗体中的输入状态,以便在用户下次使用时读取</p><p></p> 其实也不难,可以将窗体中的值写到文件或注册表中,下次启动的时候读入值就可以了 zzcctt发表于2007-6-5 16:35:00static/image/common/back.gif其实也不难,可以将窗体中的值写到文件或注册表中,下次启动的时候读入值就可以了<p>请问如何将窗体中的值写到文件或注册表中?</p><p>能提示一下用什么语句实现吗?</p> <p>写注册表用</p><p>GetAllSettings<br/>GetSetting<br/>SaveSetting </p><p>这三个函数,</p><p>写ini文件用</p><p>Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long</p><p>Public Declare Function WritePrivateProfileSection Lib "kernel32" Alias "WritePrivateProfileSectionA" (ByVal lpAppName As String, ByVal lpString As String, ByVal lpFileName As String) As Long</p><p>Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long</p><p>Public Declare Function GetPrivateProfileSection Lib "kernel32" Alias "GetPrivateProfileSectionA" (ByVal lpAppName As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long<br/>这四个API函数</p> hmxmylove发表于2007-6-6 16:50:00static/image/common/back.gif写注册表用GetAllSettingsGetSettingSaveSetting 这三个函数,写ini文件用Public Declare Function WritePrivateProfileString Lib \"kernel32\" Alias \"WritePrivateProfileStringA\" (ByVal
<p>Thx a lot!!!</p><p>GetAllSettings<br/>GetSetting<br/>SaveSetting </p><p>这三个函数我在vba的手册中找到了</p><p>但是写ini文件用的四个API函数找不到</p> 这四个API函数要自己将我刚才给你发过去的四个定义放在一个标准模块里面才能使用,否则会出错的,用VB的API views程序可以查找这四个函数 我是初学,能否结合一个实例讲解一下四个API函数的实际使用
页:
[1]