使用Environ功能

时间:2014-09-20 06:41:28

标签: access-vba ms-access-2010

两件事;我想知道如何使用' Environ'函数知道我的用户名是什么,然后我想使用一个if语句使用' Environ'用于指示我的数据库执行某些操作的函数。下面是一个简单的if语句,我试图运行(假设我的计算机名是' XXX')。不幸的是,我收到错误消息' Argument not optional'。

    If Environ = xxx Then
     MsgBox = vbOK

   Else

     MsgBox = vbRetry

   End If

1 个答案:

答案 0 :(得分:1)

您可以使用environ函数查找用户名域名

例如environ("username")将为您提供登录用户的用户名。

If Environ("username") = "xxx" Then
 MsgBox = vbOK

 Else

 MsgBox = vbRetry

 End If