三沣开发知识 购物 网址 游戏 小说 歌词 地图 快照 开发 股票 美女 新闻 笑话 | 汉字 软件 日历 阅读 下载 图书馆 编程 租车 短信 China
TxT小说阅读器
↓语音阅读,小说下载,古典文学↓
图片批量下载器
↓批量下载图片,美女图库↓
多播视频美女直播
↓电视,电影,美女直播,迅雷资源↓
一键清除垃圾
↓轻轻一点,清除系统垃圾↓
vbs/VBScript DOS/BAT hta htc python perl 游戏相关 VBA 远程脚本 ColdFusion ruby专题
autoit seraphzone PowerShell linux shell Lua Golang Erlang 其它教程 CSS/HTML/Xhtml
html5 CSS XML/XSLT Dreamweaver教程 经验交流 开发者乐园 Android开发资料
站长资讯 .NET新手 ASP.NET C# WinForm Silverlight WCF CLR WPF XNA VisualStudio ASP.NET-MVC .NET控件开发 EntityFramework WinRT-Metro Java C++ PHP Delphi Python Ruby C语言 Erlang Go Swift Scala R语言 Verilog 其它语言 架构设计 面向对象 设计模式 领域驱动 Html-Css JavaScript jQuery HTML5 SharePoint GIS技术 SAP OracleERP DynamicsCRM K2 BPM 信息安全 企业信息 Android开发 iOS开发 WindowsPhone WindowsMobile 其他手机 敏捷开发 项目管理 软件工程 SQLServer Oracle MySQL NoSQL 其它数据库 Windows7 WindowsServer Linux
  IT知识库 -> vbs/VBScript -> 用vbs将名称转换为正确的大小写的代码 -> 正文阅读
  vbs/VBScript 最新文章
vbscript基础篇 - vbs变量定义与使用方法
vbscript基础篇 - vbs数组Array的定义与使用
VBScript 根据IE窗口的标题输出ESC
vbscript网页模拟登录效果代码
vbs能调用的系统对象小结
VBS技术内幕:CreateObject函数详解
VBS中常用脚本代码
VBS教程:运算符-Or 运算符
VBS教程:VBscript语句-Option Explicit 语
vbs下用Shell.Application获取图片分辨率

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

用vbs将名称转换为正确的大小写的代码 问:
您好,脚本专家!我有一个脚本,我的帮助支持人员用它来创建用户帐户。不幸的是,有时这些帮助支持人员在忙乱中会键入类似这样的名称:kEn MYEr。如何将名称转换为正确的大小写(即 Ken Myer)呢?
-- LC
答:
您好,LC。您知道吗:您真幸运。谈到正确行事,脚本专家通常便是您最不愿意找的人。事实上,就我们所知,只有一种情况例外,那便是将名称转换为正确的大小写,即,使名称中的首字母大写,而使其余字母小写。这一点我们还是可以办到的。
注意:嘿,每个人都得能够做点什么。尽管我们更希望能投出超过 Albert Pujols 的快球或赢取奥林匹克金牌,可不管怎样,能够将名称转换为正确的大小写将是我们的下一个选择。
我们预先提醒您,执行此项任务的脚本可能看上去有点隐秘;这是因为 VBScript(不象 Visual Basic)并没有用于将字符串转换为正确大小写的内置方法。不过没关系,毕竟,如果事情太容易,那就没有任何乐趣了:
strFirstName = "kEn"
strLastName = "MYEr"
intFirstName = Len(strFirstName)
strFirstLetter = UCase(Left(strFirstName, 1))
strRemainingLetters = LCase(Right(strFirstName, intFirstName - 1))
strFirstName = strFirstLetter & strRemainingLetters
intLastName = Len(strLastName)
strFirstLetter = UCase(Left(strLastName, 1))
strRemainingLetters = LCase(Right(strLastName, intLastName - 1))
strLastName = strFirstLetter & strRemainingLetters
Wscript.Echo strFirstName, strLastName
让我们逐步向您介绍该过程。一开始,我们只是将值 kEn 和 MYEr 赋给了名为 strFirstName 和 strLastName 的变量;不用说,这便是我们需要转换的两个名称。
注意:是的,尽管不用说,不过我们还是说了。自己去想吧。
先来看看首先应该如何入手,我们是以处理用户的名字开始的。为此,我们使用 Len 函数确定字符串 kEn 中的字母数(对了:kEn 中有三个字母):
intFirstName = Len(strFirstName)
接下来,我们仅需要获取该名称的第一个字母,并将其转换为大写。这一点是通过一对函数组合来实现的。我们使用 Left 函数取得首字母,也就是,从该字符串的左边取得一个字母(倘若您对此感到好奇,那么 1 就表示我们要获取的字母数):
Left(strLastName, 1)
这样,我们就会得到字母 k。然后,我们使用 UCase 函数将该字母转换为大写:
UCase(Left(strLastName, 1))
现在我们有了大写字母 K,我们将其存储在一个名为 strFirstLetter 的变量中。这是太罗嗦了,不过所有这些步骤却是通过一行代码来执行的:
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
确实漂亮极了。而且还做得恰如其分!
上一篇文章      下一篇文章      查看所有文章
加:2015-01-18 11:08:01  更:2017-05-14 00:10:26 
 
技术频道: 站长资讯 .NET新手区 ASP.NET C# WinForm Silverlight WCF CLR WPF XNA Visual Studio ASP.NET MVC .NET控件开发 Entity Framework WinRT/Metro Java C++ PHP Delphi Python Ruby C语言 Erlang Go Swift Scala R语言 Verilog 其它语言 架构设计 面向对象 设计模式 领域驱动设计 Html/Css JavaScript jQuery HTML5 SharePoint GIS技术 SAP Oracle ERP Dynamics CRM K2 BPM 信息安全 企业信息化其他 Android开发 iOS开发 Windows Phone Windows Mobile 其他手机开发 敏捷开发 项目与团队管理 软件工程其他 SQL Server Oracle MySQL NoSQL 其它数据库 Windows 7 Windows Server Linux
脚本语言: vbs/VBScript DOS/BAT hta htc python perl 游戏相关 VBA 远程脚本 ColdFusion ruby专题 autoit seraphzone PowerShell linux shell Lua Golang Erlang 其它教程
网站开发: CSS/HTML/Xhtml html5 CSS XML/XSLT Dreamweaver教程 经验交流 开发者乐园 Android开发资料
360图书馆 软件开发资料 文字转语音 购物精选 软件下载 美食菜谱 新闻资讯 电影视频 小游戏 Chinese Culture 股票 租车
生肖星座 三丰软件 视频 开发 短信 中国文化 网文精选 搜图网 美图 阅读网 多播 租车 短信 看图 日历 万年历 2018年7日历
2018-7-22 16:41:48
多播视频美女直播
↓电视,电影,美女直播,迅雷资源↓
TxT小说阅读器
↓语音阅读,小说下载,古典文学↓
一键清除垃圾
↓轻轻一点,清除系统垃圾↓
图片批量下载器
↓批量下载图片,美女图库↓
  网站联系: qq:121756557 email:121756557@qq.com  IT知识库