社区 › Auto Lisp › VBA获取用户名？

Andresig 发表于 2022-7-6 12:04:02

VBA获取用户名？

我需要检索计算机的用户名，有人帮我如何在VBA中这样做吗？
非常感谢。

gile 发表于 2022-7-6 12:22:28

你好
 
你是说LOGINNAME系统变量吗？

Andresig 发表于 2022-7-6 12:33:34

嗨，吉尔，
 
LOGINNAME将帮助我，但在LISP中，我需要在VBA中检索它
你知道如何在VBA中检索它吗？

Andresig 发表于 2022-7-6 12:36:04

谢谢Gile！
我查看变量“LOGINNAME”，现在我知道如何获取用户名。。。

Sub GetUserName()
Dim UserName As String
   
UserName = ThisDrawing.GetVariable("LOGINNAME")

MsgBox UserName
End Sub

gile 发表于 2022-7-6 12:48:05

LOGINNAME不是LISP函数，它是AutoCAD系统变量。
 
我对VBA了解不多，但我认为（getvar“LOGINNAME”）LISP表达式的等价物应该类似于：
 
应用GetVariable（“LOGINNAME”）
 

bkm 发表于 2022-7-6 13:00:11

如果您在计算机名之后，可以通过读取其Windows环境变量来获取它，如下所示。
 

Sub GetComputerName()
Dim strComputer As String
strComputer = Environ("COMPUTERNAME")
MsgBox strComputer
End Sub

Andresig 发表于 2022-7-6 13:04:14

谢谢你，bkm，这也会帮助我。

查看完整版本: VBA获取用户名？