回复：【求助】关于数字炸弹游戏随机问题

阿勒 贴吧不能发代码吗？被删了。。。

@晕晕晕赫尔墨斯我这里要熄灯了晚上~ 感谢啊 熄灯后我再看看随机啥的。。哎。。课题纠结，，

简单来说定义一个数组 a（1 to 3）
for i=1 to 3
a(i)=int(random*1000)+1
next i
i=int(random*3)+1
a(i)=a*b
然后如果你label用的是控件数组
for i=1to 3
label1(i)=a(i)
next i
如果不是 自己一个一个打
你试试看

@晕晕晕赫尔墨斯 啊啊啊~ 阿里嘎都~ 昨天晚上大概按照那个思路定义了a(3)然后让ijk三个变量在3以内随即不重复然后让a(i)=int(rnd*1000)+1 a(j)=int(rnd*1000)+1 a(k)=a*b=f 然后让三个label的caption分别等于a(1)a(2)a(3)就到到了随机的目的 熬到1点多。。果然更别人讨论下比较有思路，，谢了啊 问题解决了~ 下次有问题才问你嘻嘻 还有好多内容啊。。

@1164542373答案出来了。。

点击后回到顶部重新下落

但是不点击就不会重新下落 落下去就没有后续了【下落是写在时钟空间里的】

而且下面的随机算式我是和label的随机答案写在遗弃定义成sub函数的 但是后面应用的时候就更上图一样 点击图片后随机答案重新生成但是下面的算式却还是原来的算式没有变 明明写在一个函数里来call的 求解TAT

我想的是top值超出6885就返回到i值但是运行后还是老样子我这个代码有问题吗？？@晕晕晕赫尔墨斯

完整的代码

@晕晕晕赫尔墨斯 就是这样的问题很纠结，，TAT

我用控件数组改了个发给你，你自己看下吧~

求数字炸弹游戏的VB代码.....

创意不错，是个点子，难度也不大。

求帮助 哥们给我发一份呗 谢谢了 942340111@qq.com

求帮忙 有数字炸弹游戏VB的给我发一份吧 谢谢1932556964@qq.com