7,763
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
cdsun 2005-03-22
- 打赏
- 举报
mark
东方冉 2005-03-22
- 打赏
- 举报
mark
Gutta 2005-03-21
- 打赏
- 举报
使用API函数：GetUserName
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
\
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
\
熊猫平子 2005-03-21
- 打赏
- 举报
对不起，我是想问是不是超级用户
AdonisChai 2005-03-21
- 打赏
- 举报
MsgBox Environ("ComputerName") & vbCrLf & Environ("UserName")
