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"换成你的字符串就可以判断了。
