此程序无法运行?
</html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>13</title>
</head>
<body>
<script language="vbscript">
dim n,sum
n=1
sum=0
do while n<10
n=2n-1
sum=sum+n
msgbox "1+100="&n
loop
msgbox "1+100="&sum
</script>
</body>
</html>
运行结果看附件
Doc1.rar
(24.87 KB)
[ 本帖最后由 yuanming_003 于 2010-3-9 14:24 编辑 ]