求vb随机数代码我又厚着脸皮来了,继续求随机数代码,求一段vb代码,三个text文本框,其中前两个为随机数产生的范围,如
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/10 19:47:45
求vb随机数代码
我又厚着脸皮来了,继续求随机数代码,
求一段vb代码,三个text文本框,其中前两个为随机数产生的范围,如1-100.或者15-29,后面一个为随机数产生的个数,所有的都为正整数,不能有重复的数字和0,最后能输出文本到txt,如果能输出到pdf最好了,内容除了包括产生的随机数外,还应包括随机数产生的范围及产生的个数.
我又厚着脸皮来了,继续求随机数代码,
求一段vb代码,三个text文本框,其中前两个为随机数产生的范围,如1-100.或者15-29,后面一个为随机数产生的个数,所有的都为正整数,不能有重复的数字和0,最后能输出文本到txt,如果能输出到pdf最好了,内容除了包括产生的随机数外,还应包括随机数产生的范围及产生的个数.
Private Sub Command1_Click()
Dim min, max, n, i, a()
min = Val(Text1)
max = Val(Text2)
n = Val(Text3)
ReDim a(n)
Randomize
For i = 1 To n
Do
a(i) = Int(Rnd * (max - min + 1)) + min
For j = 1 To i
If a(i) = a(j) And i j Then Exit For
Next
Loop While j
Dim min, max, n, i, a()
min = Val(Text1)
max = Val(Text2)
n = Val(Text3)
ReDim a(n)
Randomize
For i = 1 To n
Do
a(i) = Int(Rnd * (max - min + 1)) + min
For j = 1 To i
If a(i) = a(j) And i j Then Exit For
Next
Loop While j
求vb随机数代码我又厚着脸皮来了,继续求随机数代码,求一段vb代码,三个text文本框,其中前两个为随机数产生的范围,如
急求vb代码 单击“开始”按钮后每隔0.01秒产生2个随机数10-99之间的随机数
VB中如何在2-200中产生10个随机数,且如何计算其中素数的和?求代码
如何通过vb 产生1-33的随机数和1-16的随机数,在1个文本中显示出来,并且从小到大排列,求代码~
求12位随机数产生代码?用C语言产生
C语言中怎么产生三个互不相同的随机数 求代码
VB 编程 用随机数函数 求随机数
vb随机数之和代码单击开始按钮以后每隔0.01秒产生2个10~99之间的随机数,如果这两个数之和为100,则停止产生新的
求一随机数生成代码,可以生成指定位数的随机数,随机数里要有字母的大小写和数字.
vb程序设计问题,求代码
VB中用随机数函数产生100个100~300之间的整数,在窗体上输出能被3 整除的数的和及个数.求代码啊...
求一个vb程序,关于产生随机数排序的.