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

来源：学生作业帮编辑：作业帮分类：数学作业时间：2024/05/15 13:11:12

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 Su

在VB中不停产生随机数,直至有10个质数为止,将所有随机数输入LIST1,将10个质数输入LIST2中. 请问VB当中当list1里的数字到list2中后按大小排列的代码该怎么写? VB中如何在2-200中产生10个随机数,且如何计算其中素数的和?求代码 vb产生两个数之间的随机数闭区间 vb如何产生两个不同随机数 VB编程产生100个[10,99]的随机数用vb编程：利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值. VB:产生30个1-100之间的随机数,统计并输出其中奇数和偶数的个数 vb利用随机函数产生50到100范围的30个随机数,显示其中最大值,最小值,平均值, JAVA产生100个1～100的随机数,怎样数其中1～20的数的个数? vb编程输入一个数,随即产生一些随机数,要求产生的随机数的平均值等于输入的数 VB计算：随机产生20个1～100的正整数放入数组中,显示产生的数,并求出其最大值