请问在vba中，如何保存用户在窗体中的输入状态，以便在用户下次使用时读取

gotop

请问在vba中，如何保存用户在窗体中的输入状态，以便在用户下次使用时读取

zzcctt

其实也不难,可以将窗体中的值写到文件或注册表中,下次启动的时候读入值就可以了

gotop

zzcctt发表于2007-6-5 16:35:00其实也不难,可以将窗体中的值写到文件或注册表中,下次启动的时候读入值就可以了

请问如何将窗体中的值写到文件或注册表中？

能提示一下用什么语句实现吗？

hmxmylove

写注册表用

GetAllSettings
GetSetting
SaveSetting

这三个函数，

写ini文件用

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

Public Declare Function WritePrivateProfileSection Lib "kernel32" Alias "WritePrivateProfileSectionA" (ByVal lpAppName As String, ByVal lpString As String, ByVal lpFileName As String) As Long

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

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
这四个API函数

gotop

hmxmylove发表于2007-6-6 16:50:00写注册表用GetAllSettingsGetSettingSaveSetting 这三个函数，写ini文件用Public Declare Function WritePrivateProfileString Lib \"kernel32\" Alias \"WritePrivateProfileStringA\" (ByVal

Thx a lot!!!

GetAllSettings
GetSetting
SaveSetting

这三个函数我在vba的手册中找到了

但是写ini文件用的四个API函数找不到

hmxmylove

这四个API函数要自己将我刚才给你发过去的四个定义放在一个标准模块里面才能使用，否则会出错的，用VB的API views程序可以查找这四个函数

wlcome

我是初学，能否结合一个实例讲解一下四个API函数的实际使用