关于while...wend 怎么有不同的结果

随心而存 · 发表于 2010-1-17 05:23:28

我是新手，又有问题了麻烦大家下面是两个代码怎么不一样吗怎么其中一个不通啊

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>while ....wend例</title>
<script language="vbscript">
sub mybutton_onclick()
dim char
const ch="?"
counter=0
msg="请输入一个字符"
char=inputbox(msg)
while char<>ch
counter=counter+1
char =inputbox(msg)
wend
msgbox"输入的字符个数为："&counter
end sub
</script>
</head>
<body>
<input type="button" name="mybutton" value="while wend 例"〉
</body>
</html>

<html>
<head>
<title>你输吧</title>
<script language="vbscript">
sub mybutton_onclick()
dim m
n=895
counter=0
msg="请输入一个数字，看看咱们的缘分"
m=inputbox(msg)
while m<>n
counter=counter+1
m=inputbox(msg)
wend
msgbox"输入的字符个数为："&counter
end sub
</script>
</head>
<body>
<input type="button" name="mybutton" value="输入">
</body>
</html>

秋风扫落叶 · 发表于 2010-1-17 05:23:32

m=cint(inputbox(msg))

☆蘫弧ゞ无悔 · 发表于 2010-1-17 05:23:36

非常感谢版主，我有学了很多东西

		自动登录	找回密码
密码			注册