用vbs将名称转换为正确的大小写的代码

2019-01-16 09:43:02于海丽

strFirstLetter = UCase(Left(strLastName, 1))
明白其工作原理了吗?好的。现在,我们需要将该名称中的其余所有字母都转换为小写。这便是我们用下面这行代码所做的事情:
strRemainingLetters = LCase(Right(strLastName, intLastName - 1))
是的,它确实看起来有点令人发疯。那就让我们将其拆开来看。我们所要做的是取得名字中除了首字母之外的所有字母。为此,我们使用 Right 函数,从右开始取得 x 个字母。x 是什么?嗯,在本例中,x 将是字符串中的字母总数减 1。换言之,就是 3 减 1,即 2。这样,我们将会得到字母 En(这便是我们所要的一切),而略掉起始字母 k。
明白了吗?以下是其实现代码:
Right(strLastName, intLastName - 1)
那么,我们对那些字母做什么呢?嗯,这次我们要使用 LCase 函数将每个字母都转换为小写:
LCase(Right(strLastName, intLastName - 1))
之后,我们取得这些小写字母并将它们储存在一个名为 strRemainingLetters 的变量中:
strRemainingLetters = LCase(Right(strLastName, intLastName - 1))
是的,这可能是有点令人困惑。但是只要您亲自将该代码过上一两遍,就应该会弄明白了。或者,也可对该代码进行修改,先执行 Left/Right 部分,然后再调用 UCase 或 LCase:
intFirstName = Len(strFirstName)
strFirstLetter = Left(strFirstName, 1)
strFirstLetter = UCase(strFirstLetter)
strRemainingLetters = Right(strFirstName, intFirstName - 1)
strRemainingLetters = LCase(strRemainingLetters)
如果分步进行对您有所帮助,那就再好不过了。
最后,我们需要重新构造用户的名字。为此,我们使用变量 strFirstLetter(其中包含用户名字中首字母的大写版本),并将其与变量 strRemainingLetters(其中包含用户名字中其余所有字母的小写版本)进行合并:
strFirstName = strFirstLetter & strRemainingLetters
对姓氏重复上述整个过程,然后回显“新”的用户姓名。
Wscript.Echo strFirstName, strLastName
来看看我们这样做会得到什么?
Ken Myer
确实漂亮极了。而且还做得恰如其分!