vb产生20个随机数放入list1再将其中不同的数放在list2

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 01:25:30
vb产生20个随机数放入list1再将其中不同的数放在list2

vb产生20个随机数放入list1再将其中不同的数放在list2
vb产生20个随机数放入list1再将其中不同的数放在list2

vb产生20个随机数放入list1再将其中不同的数放在list2
Private Sub Command1_Click()
Randomize
For i = 1 To 20
List1.AddItem Int(Rnd * 100)
Next
List2.AddItem List1.List(0)
For i = 1 To 19
For j = 0 To List2.ListCount - 1
If List1.List(i) = List2.List(j) Then Exit For
Next
If j = List2.ListCount Then List2.AddItem List1.List(i)
Next
End Sub

vb产生20个随机数放入list1再将其中不同的数放在list2 在VB中不停产生随机数,直至有10个质数为止,将所有随机数输入LIST1,将10个质数输入LIST2中. vb编程 产生20个0到99之间的随机数,将其中5和3的倍数打印出来 用vb编程:利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值. 利用随机函数产生50-100范伟内的20个随机数,显示其中的最大值,最小值和平均值VB 的题, VB编程产生100个[10,99]的随机数 VB语言从多个范围产生一个随机数 vb 1到100内产生20个随机数20个随机数显示在文本框1中,并在文本框1中找出素数,将素数显示在文本框2中 VB代码意思List1.RemoveItem List1.ListIndex 在vb的list里生成20个两位数的随机数后,怎样将生成的随机数中的偶数删除, VB计算:随机产生20个1~100的正整数放入数组中,显示产生的数,并求出其最大值 随机产生20个10~99的正整数,除去其中的偶数,再将剩余的奇数从大到小排列 用vb编写 如何用VB产生2~99之间的1次1个随机数,可以重复的,另外求如何用VB产生1~n之间的1次20个随机数用VB产生1~n之间的1次20个随机数,这个不能重复... 产生一个随机数,均匀分布,在0到100产生3000个随机数,用word输出,能保存用vb编程 C语言.随机产生20个1到50之间的正整数放入数组A中,输出这组随机数.然后,选出其中的素数放入数组B中输出这些素数,并计算素数之和. 随机产生20个1-50的之间的正整数放入数组A中,输入这组随机数.然后,选出其中的素数放入数组B中,输出这些素数,并计算素数之和 VB将一组数随机排列到list1,比如1到100 VB产生500以内的随机数