标题: [贴士] 转换成ASCII码 [打印本页]

---

作者: SzAngel    时间: 2007-8-30 18:24     标题: 转换成ASCII码

Rem main
VBSCall g=InputBox("请选择翻页:第一页(1)、第二页(2) ")
If asc(g)<49 or asc(g)>50
    MessageBox 您必须输入一个大于零小于2的整数值","请选择频道页;第一页(1)、第二页(2)
    Goto main
EndIf

按键对数字是忽略的，不知是BUG还是其他原因，你可以转换成ASCII码进行比较。

---

欢迎光临 紫菀论坛 (http://bbs.szyin.com/)

Powered by Discuz! 7.1