菜鸟向大虾求教,关于FOR NEXT与IF END IF的嵌套用法

Question

问题:         在11--99这些数字中,如何用表达式表示所有十位不是大数个位不是奇数的数字?

Answer 1

dim i as integerfor i = 11 to 49
    if i mod 2 = 0 then debug.print i
next i

Answer 2

十位不是大数是什麼意思?
dim i as integerfor i=11 to 99
   If (i / 10) / 2 = 0 Then  ‘十位是偶数
       if (i mod 10)/2 =0 then'不是奇数的数字
          print i
      endif
   endifnext

Answer 3

十位不是偶数个位不是奇数
1.
for i=1 to 9 step 2
    for j=0 to 8 step 2
        print i * 10 + j
    next j
next i2.
    For i = 12 To 98 Step 2
        If i \ 10 Mod 2 Then Debug.Print i
    Next i3.
    For i = 11 To 99
        If i \ 10 Mod 2 And Not i Mod 2 Then Debug.Print i
    Next i

Answer 4

 i >= 11 And i <= 99 And i \ 10 Mod 2 And Not i Mod 2

Answer 5

我没用过VBA,能把完整的答案告诉我吗?从开头第一行到结尾,谢谢

Answer 6

dim   i   as   integer for   i   =   11   to   49 
        if   i   mod   2   =   0  and i\10 mod 2=1 then   debug.print   i 
next   i