帮我看一下程序，哪里有问题
access吧
全部回复
仅看楼主
level 2
帝王洲第一
楼主
Sub op()
For a = 100 To 1000
b = Int(a / 100)
x = a - 100 * b
c = Int(x / 10)
d = a - c * 10
If b ^ 3 + c ^ 3 + d ^ 3 = a Then
Debug.Print a
End If
2017年04月21日 14点04分
1
level 2
帝王洲第一
楼主
有人吗
2017年04月21日 14点04分
2
level 2
帝王洲第一
楼主
帮忙看一下
2017年04月21日 14点04分
3
level 2
帝王洲第一
楼主
没人帮忙吗
2017年04月21日 14点04分
4
level 12
cll落花时节
缺少next
2017年04月22日 00点04分
5
帝王洲第一
next 加在哪
2017年04月23日 07点04分
帝王洲第一
有点懵
2017年04月23日 07点04分
帝王洲第一
好像加了next也出不了结果
2017年04月23日 07点04分
帝王洲第一
可以了谢谢
2017年04月23日 08点04分
1
