7314.html

来自「VB技巧问答10000例 VB技巧问答10000例」· HTML 代码 · 共 27 行

HTML
27
字号
<html>
  <head>
    <title>Re: 简单问题: 如果有20个数字,1 To 20,如何可以Random地出现不同次序?</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 简单问题: 如果有20个数字,1 To 20,如何可以Random地出现不同次序?</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:hong@myownemail.com">匡</a> on November 12, 1998 at 17:07:31:<p>
In Reply to: <a href="7141.html">Re: 简单问题: 如果有20个数字,1 To 20,如何可以Random地出现不同次序?</a> posted by 小吴 on November 06, 1998 at 07:54:12:<p>
: 既然你说是简单问题,就再想一想吧! 把你的方法 post 出来让大家参考。<br>: 我是有一个办法,不过下周再告诉你。<p>如困是7个数字,最简单的方法....,但要排列20个数字就麻烦了,怎么办?<p>Do<br>Randomize<br>am% = Int(7 * Rnd)<p>bm% = Int(7 * Rnd)<p>cm% = Int(7 * Rnd)<p>dm% = Int(7 * Rnd)<p>em% = Int(7 * Rnd)<p>Loop Until am% <> bm% And am% <> cm% And am% <> dm% And am% <> em% And bm% <> cm% And bm% <> dm% And bm% <> em% And cm% <> dm% And cm% <> em% And dm% <> em%<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 7314-->
<!--top: 7370--><li><a href="7370.html">Re: 简单问题: 如果有20个数字,1 To 20,如何可以Random地出现不同次序?</a> <b>knight</b> <i>09:30:35 11/16/98</i>
(<!--responses: 7370-->0)
<ul><!--insert: 7370-->
</ul><!--end: 7370-->
</ul><!--end: 7314-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?