请高手进来拿分.(不简单)参与者有分!!!!!!!!!!!!

Question

一般有以下几种方法 
.ini
xml
文本 
注册表
数据库

Answer 1

推荐使用。INI文件配置。不要随意的在注册表中更改一些东西，小心系统不能自举！！

Answer 2

if usera
  load usera.ini
if userb
  load userb.ini
...
难道是这样的吗？你叫人怎么举例嘛，是不是要读写ini文件的方法呢？
如下：copy to formPrivate 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
Private 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
Private Sub Form_Load()
    'KPD-Team 1999
    'URL: http://www.allapi.net/
    'E-Mail: [email protected]
    Dim Ret As String, NC As Long
    'Write the setting to the file (c:\test.ini) under
    '   Project1 -> Keyname
    WritePrivateProfileString App.Title, "KeyName", "This is the value", "c:\test.ini"
    'Create a buffer
    Ret = String(255, 0)
    'Retrieve the string
    NC = GetPrivateProfileString(App.Title, "KeyName", "Default", Ret, 255, "C:\test.ini")
    'NC is the number of characters copied to the buffer
    If NC <> 0 Then Ret = Left$(Ret, NC)
    'Show our string
    MsgBox Ret
    'Delete the file
    Kill "c:\test.ini"
End Sub

Answer 3

每个用户拥有不同的ID和配置文件。写在数据库里也行。用ACCESS吧，很容易的。

Answer 4

你是使用数据库吗?如果不是,你的软件就是不太好,如果用数据库,而没有用户登录的表,你的数据库又不太好.如果你不能实现对数据库的不同的用户的ID的控制,你的VB又不太好,所以我劝你把这些东西弄好!

Answer 5

用INI文件配置是比较方便的 可以在一个set.ini文件中设置每个用户的情况至于读写ini文件 
请搜索 ini 就可以了

Answer 6

在VB里用存取注册表是最简单的方法来保存信息!
存：SaveSetting app.title,"Setting","级别","1"
取：level=GetSetting(app.title,"Setting","级别","0")