作者gofin (云色)
看板Visual_Basic
标题Re: [VB6 ] 我是新手，请问一下.....for next的函数
时间Tue Dec 5 16:28:37 2006
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
1F：推 commiserate:i mod 3 < > 0 => 3改成9吧... 12/05 18:08