是否有一个函数可以用来将当前用户名而不是他们的用户名返回到文本框-所以是JoeBloggs，而不是jbloggs？ 最佳答案 假设您设置了ActiveDirectory，您可以使用以下代码，摘自AndreyArtemyev'sanswerhere:PublicFunctionADtest()AsStringDimADSIAsObject,UNAsObjectSetADSI=CreateObject("ADSystemInfo")SetUN=GetObject("LDAP://"&ADSI.UserName)ADtest=UN.Fir