用VB编写程序,从1乘到100

来源：百度知道 编辑：UC知道 时间：2024/06/16 08:17:40
偶试卷的一道题,就这样..
补充下：
其实是一道填空题：
Dim s,i As Integer
s=__________
i=__________
While i__________
s=__________
i=__________
Wend
Print s

大家把程序补上就行了。话说写太深奥我看不懂。。

dim prod as single
dim i as integer
for i=1 to 100
prod=prod*i
next
print prod

dim i as integer,j as variant
j=1 '不加这行 j的值默认为0 结果也就是0了.

for i = 1 to 100
j=j*i
next
msgbox j

'ps.结果很大..9E+157..

'==========================
Dim s,i As Integer
s=1
i=1
While i<=100
s=s*i
i=i+1
Wend
Print s

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>1到100之和</title>
</head>
<script language="javascript">
<!--
sum=0
for(i=1;i<=100;i++)
{
sum=sum+i;
}
document.write("1到100之和为："+sum)
-->
</script>
<body>
</body>
</html>

Dim s,i As Integer
s=_1_________
i=____1______
While i__<=100________