只获得computername的一部分

Question

我知道％computername％是计算机名称的变量，％username％是用户名的变量。我需要获取计算机名称，然后替换最后3个字符。有任何想法吗？我不是程序员，所以请记住这一点 - 谢谢:)

Answer 1

要获取计算机名称，您可以使用ComputerName对象的WScript.Network属性：

Dim str
str = CreateObject("WScript.Network").ComputerName

要从字符串中删除最后一个字符，请使用Left函数：

str = Left(str, Len(str) - 3)

然后，您可以使用字符串连接运算符&附加替换字符串：

str = str & "NEW"