VB随机生成10个数字 赋值到TEXT
vb吧
全部回复
仅看楼主
level 4
Top丿Kernel 楼主
一个Command1按钮
10个Text框,分别是 Text1 - Text11
点击一下按钮,随机生成1-10的数字,然后每个数字分别赋值到 TEXT框里。 每个数字都不重复。。
忘记代码了,,球帮助
2021年05月17日 10点05分 1
level 4
Top丿Kernel 楼主
完美答案,已经贴出!!!
留给需要的新人学习
2021年05月17日 10点05分 3
level 4
Top丿Kernel 楼主
代码好像不对 有时候再次点击 会发现有相同的数字
大神帮忙给改改
2021年05月17日 10点05分 4
问题来了,你的代码呢?
2021年05月17日 11点05分
@余思培 我代码发了啊
2021年05月17日 11点05分
level 4
Top丿Kernel 楼主
2021年05月17日 11点05分 6
level 4
Top丿Kernel 楼主
我发了代码 你们看不到吗
2021年05月17日 11点05分 7
level 15
2楼和5楼都看不到,只有6楼的图片版本可以看到
不过,建议你了解一下洗牌算法:
For i = 0 To 9
a(i) = i + 1
Next i
For i = 0 To 9
k = Int(Rnd * 10)
t = a(i)
a(i) = a(k)
a(k) = t
Next i
2021年05月17日 12点05分 8
插个坐标(抱歉打扰)
2021年05月17日 15点05分
1