If n Mod 3 <> 0 Then m = m + n \ 3，M的值是多少？

[wweilinux]

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
For n = 1 To 20
If n Mod 3 <> 0 Then m = m + n \ 3 'M的初值是多少？“\”是什么除法，四舍
五入吗？
Next n
Print n
End Sub
程序运行后，如果单击命令按钮，则窗体上显示的内容是
A）15 B）18 C）21 D）24

[张海霖]

是取整，直接截取，不四舍五入

[wweilinux]

'M的初值是多少？

[talent303]

m的初值一般为0......但你这条程序应该还有其它的代码吧

[northwolves]

1-20 运算完后，next n--->n=21

[talent303]

楼上的答案没错,,,是选C

[laisiwei]

“\”是就是整除
比如
2\3=0
-2/3=0

反正就是做好除法以后，取靠近0的整数

[wweilinux]

"/"是什么除法?
能把n和m的值都列出来吗?

[northwolves]

Private Sub Command1_Click()
For n = 1 To 20
If n Mod 3 <> 0 Then m = m + n \ 3 'M的初值是多少？“\”是什么除法，四舍五入吗？
Debug.Print "n=" & n & ",m=" & m
Next n
Debug.Print "------------------"
Debug.Print "n=" & n & ",m=" & m
End Sub



n=1,m=0
n=2,m=0
n=3,m=0
n=4,m=1
n=5,m=2
n=6,m=2
n=7,m=4
n=8,m=6
n=9,m=6
n=10,m=9
n=11,m=12
n=12,m=12
n=13,m=16
n=14,m=20
n=15,m=20
n=16,m=25
n=17,m=30
n=18,m=30
n=19,m=36
n=20,m=42
------------------
n=21,m=42

[helanshan]

不明白 n为什么会=21.....:(

[VirtualAlloc]

选C，
是计算机2级的VB考试题吧？

[wweilinux]

确实是2003年下半年VB考试题呀。