下载此文档

循环结构.doc

文档分类：IT计算机 | 页数：约3页举报非法文档有奖

1/3

下载提示

1.该资料是网友上传的，本站提供全文预览，预览什么样，下载就什么样。
2.下载该文档所得收入归上传者、原创者。
3.下载的文档，不会出现我们的网址水印。

同意并开始全文预览

(约 1-6 秒)

1/3 下载此文档

文档列表 文档介绍

94页作业(3)mand1_Click()DimsAsDoubleDimIAsIntegerDimkAsIntegerConstpAsSingle==0s=*(1+p)>15s=s*(1+p)I=I+1k=2005+(k&"年的人口总数为"&Format(s,"")&"亿")(1)种方法:mand1_Click()DimiAsIntegerDimkAsIntegerRandomizeTimer'初始化随机数发生器i==50k=Fix(Rnd*100)(k)LoopEndSub第(2)种方法:mand1_Click()DimIAsIntegerDimkAsIntegerRandomizeTimerI=<>50k=Fix(Rnd*100)(k)LoopEndSub第(3)种方法:mand1_Click()DimIAsIntegerDimkAsIntegerRandomizeTimerI==Fix(Rnd*100)(k)LoopWhilek<>50EndSub第(4)种方法:mand1_Click()DimiAsIntegerDimkAsIntegerRandomizeTimeri==Fix(Rnd*100)(k)LoopUntilk=()DimiAsIntegerDimjAsInte

循环结构来自淘豆网www.taodocs.com转载请标明出处.