UserName = Environ $（“UserName”）在最新版本的Windows中不起作用？

Question

此代碼似乎不適用於Windows 7/8？

Public Function UserName()
    UserName = Environ$("UserName")
End Function

這有什么黑客攻擊嗎？

問候，

Answer 1

我用：

Username = CreateObject("WScript.Network").Username

Answer 2

這適用於使用Excel 2010的Windows7。

Environ("username")