UC知道有关vb题目求解，要有详细说明。急！！1
来源：百度知道 编辑：UC知道 时间：2024/06/04 00:17:23
1 编写如下事件过程。
Private Sub Form_Click()
For a=1 To 10
If a Mod 2=0 Then
b=b+a
Else
b=b-a
Next a
MsgBox b
End Sub
则程序运行后，单击窗体，将显示的结果是______.
(A) 0 (B) 25 (C) 5 (D)1
2 在窗体上添加一命令按钮，然后编写如下事件。
Private Sub Command1_Click()
For a=1To 5
b=1
For d=1 To 10
For c=1 To 6
b=b+1
Next c
Next a
MsgBox b
End Sub
则程序运行，单击命令按钮，输出的结果是_______.
(A) 60 (B)120 (C) 15 (D) 61
要知道原因，解题给出详细步骤
Private Sub Form_Click()
For a=1 To 10
If a Mod 2=0 Then
b=b+a
Else
b=b-a
Next a
MsgBox b
End Sub
则程序运行后，单击窗体，将显示的结果是______.
(A) 0 (B) 25 (C) 5 (D)1
2 在窗体上添加一命令按钮，然后编写如下事件。
Private Sub Command1_Click()
For a=1To 5
b=1
For d=1 To 10
For c=1 To 6
b=b+1
Next c
Next a
MsgBox b
End Sub
则程序运行，单击命令按钮，输出的结果是_______.
(A) 60 (B)120 (C) 15 (D) 61
要知道原因，解题给出详细步骤
我晕，运行一下不就行了！？！
第一题，如果是你打漏一个end if的话，那么结果应该是5，程序是加奇减偶。如果你没漏，那显示结果就是:编绎错误，next 没有for.
第二题，也漏了个for, 结果是61。如果你没漏，那程序依然无法运行。
并且我选择是把next补到最外层，这样for a=1 to 5 这个循环是失效，因为每次都给B设为1了，那只要看里面两层循环B是可以了。
1C
2D