关于如何获取计算机名称的方法有多样。最直接的一种获取计算机名称的方法：单击桌面上的“我的电脑”图标，鼠标右键，选择“属性”，在“计算机名”选项卡，可以查看到自己完整的计算机名称。如下面截图所示：
不过，对于咱们的excel迷们，肯定想用VBA自己写句代码玩玩，呵呵。
随意新建或者使用已打开的工作表都可以，按下ALT+F11，打开VBE编辑器，单击菜单：插入——模块，新建模块1，在右边代码窗口复制下面的代码，然后单击绿色三角形或者按F5键运行，会弹出一个消息框，显示的就是利用VBA代码获取到的计算机名称。
Sub 获取计算机名称()
Dim str As String
str = Environ("Computername")
MsgBox str
End Sub
上面这段VBA代码获取计算机名称，关键的一点就是Environ函数的使用。
核心关注：拓步ERP系统平台是覆盖了众多的业务领域、行业应用，蕴涵了丰富的ERP管理思想，集成了ERP软件业务管理理念，功能涉及供应链、成本、制造、CRM、HR等众多业务领域的管理，全面涵盖了企业关注ERP管理系统的核心领域，是众多中小企业信息化建设首选的ERP管理软件信赖品牌。
转载请注明出处：拓步ERP资讯网http://www.toberp.com/
相关文章
