VB中关于: for ...to,和DO WHILE....LOOP语句的用法
VB中关于:for...to,和DOWHILE....LOOP语句的用法我看了很久,没看明白,请教师傅,最好讲得通俗一点.最好举个例.谢谢,...
VB中关于: for ...to,和DO WHILE....LOOP语句的用法
我看了很久,没看明白,请教师傅,最好讲得通俗一点.最好举个例.谢谢, 展开
我看了很久,没看明白,请教师傅,最好讲得通俗一点.最好举个例.谢谢, 展开
3个回答
展开全部
dim
a,
b,
s,
i
as
integer
'定义变量
a
=
val(text1.text)
'把text1由字符串转成数值后赋值给变量a
b
=
val(text2.text)
'同上
s
=
0
's的值归零
i
=
a
'把a的值赋值给变量i
do
while
i
<=
b
'当i<=b的时候做循环
s
=
s
+
i
'把i的值累加到s上
i
=
i
+
1
'i增加1
loop
'循环结尾
msgbox
"计算结果为:"
&
s
'用对话框输出计算结果s
end
sub
'结束
a,
b,
s,
i
as
integer
'定义变量
a
=
val(text1.text)
'把text1由字符串转成数值后赋值给变量a
b
=
val(text2.text)
'同上
s
=
0
's的值归零
i
=
a
'把a的值赋值给变量i
do
while
i
<=
b
'当i<=b的时候做循环
s
=
s
+
i
'把i的值累加到s上
i
=
i
+
1
'i增加1
loop
'循环结尾
msgbox
"计算结果为:"
&
s
'用对话框输出计算结果s
end
sub
'结束
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2009-04-25
展开全部
求:1+2+……+10的和
for i=1 to 10
sum=sum+i
next
同样求:1+2+……+10的和
i=1
do while i<=10
sum=sum+i
i=i+1
loop
for i=1 to 10
sum=sum+i
next
同样求:1+2+……+10的和
i=1
do while i<=10
sum=sum+i
i=i+1
loop
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |