作业帮 > 综合 > 作业

用VB从1-12这12个数中随机生成3个互不重复的数

来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/05/08 22:34:29
用VB从1-12这12个数中随机生成3个互不重复的数
3个TEXT用来分别显示三个数.
一个Command1 用来每点一次刷新一次.
三个数只要不是重复就可以了,不用大小顺序什么的.
请写出完整程序 ,最好带上注释.我是小白,谢谢……分不多了,只能给这点
用VB从1-12这12个数中随机生成3个互不重复的数
private sub command1_click()
randomize
dim a as integer ,b as integer ,c as integer
a=int(rnd*12)+1
text1=a
do
b=int(rnd*12)+1
loop until ba
text2=b
do
c=int(rnd*12)+1
loop until cb and ca
text3=c
end su