vb设计随机抽奖程序

时间： 发布人：bh819116093
vb设计随机抽奖程序

已解决问题

谷歌bh819116093用户在提交了关于“周鸿tvb设计随机抽奖程序”的提问，欢迎大家涌跃发表自己的观点。目前共有1个回答，最后更新于2025-02-23T12:38:31。希望大家能够帮助她。

详细问题描述及疑问：期待您的答案，不知道说什么,送你一朵小红花吧 ！

希望以下的回答，能够帮助你。

第1个回答

用户名：do61来自228  

1234567891011121314151617'5个文本框改成控件数组，索引从0不触适说编到4PrivateisStopAsBooleanPrivateSubCommand1_Cli问答ck()'数字滚动RandomizeDimrndIndexAsIntegerisStop=FalseD探配保损述按那仅oUntilis下Stop'循环语句滚动数字太快了，应该放在时钟控件中较好，可以控制速度rndIndex=Int(Rnd*5)'**生一个随机的文本框数组索引T蛋进可层赶板这孙ext1(rndIndex)=(Val(Text1(rndIndex)都绿酒据怀元混村要大)+1)Mod10'小收排介案情愿对文本框增加一个值DoEventsLoopEndSubPrivateSubComman维显操d2_Click()'停止滚动isStop=TrueEndS唱显剂角ub