作者sioo (加油加油)
看板Visual_Basic
标题Re: [请益] 请问关於do loop
时间Sun May 29 01:01:28 2005
好巧,下午正在帮堂弟写作业,也写了一个猜数字,
我是看网路上面的范例来产生四个不同的数字:
Randomize
A(0) = CInt(Int(Rnd * 10))
Do
A(1) = CInt(Int(Rnd * 10))
Loop While A(1) = A(0)
Do
A(2) = CInt(Int(Rnd * 10))
Loop While A(2) = A(0) Or A(2) = A(1)
Do
A(3) = CInt(Int(Rnd * 10))
Loop While A(3) = A(0) Or A(3) = A(1) Or A(3) = A(2)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.143.214.72