内容提要：文章介绍如何获取计算机名的方法:使用VBA代码获取计算机名称之后,再使用系统属性来检测获取到的计算机名称是否正确.
关于如何获取计算机名称的方法有多样。最直接的一种获取计算机名称的方法：单击桌面上的“我的电脑”图标，鼠标右键，选择“属性”，在“计算机名”选项卡，可以查看到自己完整的计算机名称。如下面截图所示：
不过，对于咱们的excel迷们，肯定想用VBA自己写句代码玩玩，呵呵。
随意新建或者使用已打开的工作表都可以，按下ALT+F11，打开VBE编辑器，单击菜单：插入——模块，新建模块1，在右边代码窗口复制下面的代码，然后单击绿色三角形或者按F5键运行，会弹出一个消息框，显示的就是利用VBA代码获取到的计算机名称。
Sub 获取计算机名称()
Dim str As String
str = Environ("Computername")
MsgBox str
End Sub
上面这段VBA代码获取计算机名称，关键的一点就是Environ函数的使用。
