“你是我的眼” 之行动下移

米老师昨天讲完课之后,本打算马上就把自己拍照的代码敲一遍。可是昨天敲完之后发现根本不能实现米老师所说的“产生k个不重复的随机整数”的目的,于是就去吃完饭了。后来不小心又把电脑关闭了,,,,结果所有的辛苦都随风而逝了。。此时,突然想到米老师曾经说过的话“作为程序员要有保存工程的意识,否则很容易功亏一篑”。哎,都怪自己二年级前半年比较幼稚,不听话,现在犯错了才知道了“不听老人言吃亏在眼前”的道理。于是刚刚有敲了一遍,但是悲催的是,我竟然用手机拍下来的是那些辅助性的工作,而整个题的题眼,我竟然漏排啦!!!!!!突然想到为何昨晚的工程不能实现了。。。于是就自己想着按着米老师的思路自己编写了一个程序,或许跟米老师的有些出入,但是我实现了一下,也能实现米老师要求的功能。我在代码中用了大量的注释,相信就算不是提高班的同学也能看的懂的。
首先是整体

然后是“题眼”也是我漏拍的部分:产生k个不重复的随机整数。注明一下其中求m到n之间的随机整数是公式有int(m+(n-m)*rnd()+1)更正为int(m+(n-m+1)* rnd()

最后是求最大值,以及输出部分

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...