Private Sub Form_click() Dim x,i,j x = 0 For i = 0 To 1 x = x + 1 For j = 0 To 3 If Not (j Mod 2)
Private Sub Form_click()
Dim x,i,j
x = 0
For i = 0 To 1
x = x + 1
For j = 0 To 3
If Not (j Mod 2) Then x = x + 1
Next j
Next i
Print "x="; x
End Sub运行后结果为10.怎么理解啊,
人气:301 ℃ 时间:2020-10-01 21:18:49
解答
Dim x,i,j '定义三个变量
x = 0 'x初始化
For i = 0 To 1 '外循环两次
x = x + 1 'x+2
For j = 0 To 3 '0~3共4次 2*4=8次
If Not (j Mod 2) Then x = x + 1 '只有当not(-1)才不x+1,本题目不可能j mod 2=-1,所以循环8次,x+8
Next j
Next i
Print "x="; x 'x=10
推荐
- access下面程序运行后输出的是 Private Sub Form_Click() For i=1 To 4 x=1 For j=1 To 3 x=3 For k=1 To
- 请问what have you got ,这是什么时态
- 用一根76厘米的铁丝围成一个长方形的框架,如果长和宽都是7厘米,高是多少厘米?
- 大千世界万事万物,自然界的各色景观处处有学问,处处有语文.在学好各门功课的基础上,我们还要学会读社
- original intention是什么意思
- 用乙炔表测乙炔压力怎么才正常
- 认真阅读本文,就你感受最深的一点,联系实际谈谈你的认识.
- ⑵《礼记》是_______家经典之一,西汉_______(人名)对秦汉以前各种礼仪论著加以辑录,其中的《大道之行也》指明了古代政治上的最高理想________.
猜你喜欢