上述代码拷贝下来，整理后测试可以执行，代码并没有问题，如下：
---
msgbox"小仙女不要生气了好不好"
msgbox"我知道自己错了"
msgbox"但是请相信我，我不是有意的"
msgbox"原谅我好吗？"
dim i
do while i<1
Select Case msgbox("如果你原谅我了请点是",68,"")
Case 6
i=1
Case 7
msgbox"你再考虑一下呗，我向你保证，以后绝对不会再犯了！"则老差
end Select
loop
msgbox"谢谢你原谅我，爱你呦"
---
整理过程中，也出现过上述问题，应该是文本编码问题，即：如果保存为UTF-8编码，执行出错；如果保存为GB2312，执行正常。
在Windows 8上用“记事本”写VBS代码是含贺GB2312格式，用Notepad++新建文件是UTF-8格式，执行出孙皮错（如上图）。
标签：常量,字符串
版权声明：文章由 淘百问 整理收集，来源于互联网或者用户投稿，如有侵权，请联系我们，我们会立即处理。如转载请保留本文链接：https://www.taobaiwen.com/life/352337.html
