想用VB谢一个关于在登入windows时，能够记录下个人情况的信息，或是给定用户名和密码登入，不知从那下手，望给与帮助，E-mail：[email protected] 谢谢！

Question

我仅仅知道怎样获得用户的信息
使用api  
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long 
说明 
取得当前用户的名字 
返回值 
Long，TRUE（非零）表示成功，否则返回零。会设置GetLastError 
参数表 
参数 类型及说明 
lpBuffer String，一个字串缓冲区，预先初始化成由nSize指定的长度。它将用于容纳用户名 
nSize Long，初始化成lpBuffer的长度。返回以后，它会包含载入lpBuffer的字符数量 
还有两个api不过我没有用过,你自己看看吧
VB声明 
Declare Function GetUserDefaultLangID Lib "kernel32" Alias "GetUserDefaultLangID" () As Integer 
说明 
为当前用户取得默认语言ID 
返回值 
Long，当前用户的语言ID GetUserDefaultLCID VB声明 
Declare Function GetUserDefaultLCID Lib "kernel32" Alias "GetUserDefaultLCID" () As Long 
说明 
取得当前用户的默认“地方”设置 
返回值 
Long，针对当前用户的默认地方ID 
 

Answer 1

我仅仅知道怎样获得用户的信息
使用api  
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long 
说明 
取得当前用户的名字 
返回值 
Long，TRUE（非零）表示成功，否则返回零。会设置GetLastError 
参数表 
参数 类型及说明 
lpBuffer String，一个字串缓冲区，预先初始化成由nSize指定的长度。它将用于容纳用户名 
nSize Long，初始化成lpBuffer的长度。返回以后，它会包含载入lpBuffer的字符数量 
还有两个api不过我没有用过,你自己看看吧
VB声明 
Declare Function GetUserDefaultLangID Lib "kernel32" Alias "GetUserDefaultLangID" () As Integer 
说明 
为当前用户取得默认语言ID 
返回值 
Long，当前用户的语言ID GetUserDefaultLCID VB声明 
Declare Function GetUserDefaultLCID Lib "kernel32" Alias "GetUserDefaultLCID" () As Long 
说明 
取得当前用户的默认“地方”设置 
返回值 
Long，针对当前用户的默认地方ID