Re: [VB6 ] 我是新手，請問一下.....for next的函數

[gofin (雲色)]

Sub EXAMPLE()
dim i as integer
for i = 1 to 100
        if i mod 3 = 0 then
                if i mod 3 < > 0 or i mod 7 < > 0 or i mod 11 < > 0 then
                        text1.text=text1.text & "," & i
                end if
        end if
next

END Sub
※ 引述《flyoversky (ARSHICK)》之銘言：
: 我想問一下
: 如何用FOR NEXT去作出
: １～１００裡面可以被３整除
: 但不可被７，９，１１，整除的數字

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 59.124.126.127
推 commiserate:i mod 3 < > 0    => 3改成9吧...