Private Sub Command1_Click() a = 10 For k = 1 To 5 Step -1 a = a - k Next k Print a; k End Sub 解释
3个回答
展开全部
程序有误 , For k = 1 To 5 Step -1 按理说应该是For k = 5 To 1 Step -1 .
应为step-1为依次减1, For k = 1 To 5 只能是step 1
如果为step -1,则
Private Sub Command1_Click()
a = 10
For k = 5 To 1 Step -1
a = a - k
Next k
Print a; k
End Sub
当k=5时 ,a=10-5=5
当k=4时 ,a=5-4=1
当k=3时 ,a=1-3=-2
当k=2时 ,a=-2-2=-4
当k=1时 ,a=-4-1=-5
当k=0时 , 退出循环
则窗体显示 -5 0
应为step-1为依次减1, For k = 1 To 5 只能是step 1
如果为step -1,则
Private Sub Command1_Click()
a = 10
For k = 5 To 1 Step -1
a = a - k
Next k
Print a; k
End Sub
当k=5时 ,a=10-5=5
当k=4时 ,a=5-4=1
当k=3时 ,a=1-3=-2
当k=2时 ,a=-2-2=-4
当k=1时 ,a=-4-1=-5
当k=0时 , 退出循环
则窗体显示 -5 0
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
a和k变量最好先声明一下,另外For k = 1 To 5 Step -1是表示K从1到5,变化的步长是-1,这里步长错了。可以看看VB入门。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询