VB编程 穷举(100-200内既被3整除,又被5整除的数)

[复制链接]
查看11 | 回复4 | 2012-6-21 13:37:51 | 显示全部楼层 |阅读模式
'更快的方法Private Sub Command1_Click() For i = 300 To 500 step 5
Ifi Mod 3 = 0 Then Print i NextEnd Sub '最快的方法:Private Sub Command1_Click() For i = 300 To 500 step 15
Print i NextEnd Sub 'PS: 尽可能在 程序编写以前 做好数学模型。'全盘规划,剔除不必要的计算,让程序达到最简化。'CPU是留给用户的,而不是给程序员方便的。...
回复

使用道具 举报

千问 | 2012-6-21 13:37:51 | 显示全部楼层
Private Sub Command1_Click()For i = 300 To 500If i Mod 3 = 0 And i Mod 5 = 0 Then Print iNextEnd Sub...
回复

使用道具 举报

千问 | 2012-6-21 13:37:51 | 显示全部楼层
Private Sub Command1_Click()For i = 100 To 200If i Mod 3 = 0 And i Mod 5 = 0 Then Print iNextEnd Sub怎么都写300-500呢,既然是穷举还是要都遍历过来吧。...
回复

使用道具 举报

千问 | 2012-6-21 13:37:51 | 显示全部楼层
Private Sub Command1_Click()For i = 100 To 200 Step 5If i Mod 3 = 0 And i Mod 5 = 0 Then Print iNextEnd Sub...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行