用VBS实现区别大小写的功能

1、（我事先注明，语句后用'号隔开的不是脚本内容）

先认识两个个函数：UCase、LCase。它们的作用分别是把一个字符串中的字母变成大写或小写，UCase用于大写，LCase用于小写，它们的参数都是一个字符串。

注释：1、它们会影响字符串中所有的字母。

          2、如果字符串中已经有大写、小写字母，则不会变化。

          3、如果有非字母的字符，不会变化。

这是一个例子：

a = "sS护"

b = "Ss护"

a = UCase(a)'变量a现在是SS护

b = LCase(b)'变量b现在是ss护

2、现在可以开始了，因为上面说了，已有大写、小写字母，则不会变化，那么就可以知道，把没有大写或小写的字母与用了函数后的字母比较，就能得知字母是大写还是小写。

判断脚本例子如下：

If "a" = LCase("a") Then '被LCase小写后的a并没有变化，所以是小写

End If

If "A" = UCase("A") Then '被UCase大写后的A并没有变化，所以是大写

End If

把字符串"A"和"a"换成你的字符串就可以判断了。