VB 最大值的序号随机产生20个50到350的整数,求上面所产生20个随机整数中的最大值,以及最大值的在这20个数中的序号.

来源：学生作业帮助网编辑：作业帮时间：2024/11/14 22:11:31

VB 最大值的序号随机产生20个50到350的整数,求上面所产生20个随机整数中的最大值,以及最大值的在这20个数中的序号.
VB 最大值的序号
随机产生20个50到350的整数,求上面所产生20个随机整数中的最大值,以及最大值的在这20个数中的序号.

VB 最大值的序号随机产生20个50到350的整数,求上面所产生20个随机整数中的最大值,以及最大值的在这20个数中的序号.
在窗体上建三个控件：Listbox,Textbox,CommandButton,名称分别用默认名称,代码如下：
Private Sub Command1_Click()
Dim w(20) As Integer
Dim Max As Integer, imax As Integer
Randomize
For i = 1 To 20
List1.AddItem Int(301 * Rnd + 50) '随机产生20个数
Next i
Max = Val(List1.List(0))

For i = 0 To 19
vali = Val(List1.List(i))
If Max < vali Then '找最大值
Max = vali
imax = i
End If
Next
Text1.Text = "最大值是" & Max & ",是第" & imax + 1 & "个数"
End Sub

VB 最大值的序号随机产生20个50到350的整数,求上面所产生20个随机整数中的最大值,以及最大值的在这20个数中的序号. vb利用随机函数产生50到100范围的30个随机数,显示其中最大值,最小值,平均值, VB用数组保存随机产生的10个介于20到50之间的整数,编程求出最大值,最小值,和平均 vb语言中利用随机函数产生20个50~100之间的随机整数,显示他们的最大值,最小值和写VB代码利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值 Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出随机产生任意个20个50~100的整数,求最大值、最小值,平均值,并统计高于平均值的个数.用VB语言 VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值用VB程序写出“利用随机函数产生20个50~100范围内的随机数,显示他们的最大值、最小值和平均值.”怎么写利用随机函数产生50-100范伟内的20个随机数,显示其中的最大值,最小值和平均值VB 的题, 用vb编程：利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值. vb 随机产生10个100-200之间的数求最大值急求VB编程“利用随机函数产生10个50-100之间的随机整数,求它们的最大值和平均值,要求用数组做”, 问一个VB基础题啊怎么随机产生10个30到100的数,求最大值、最小值和平均值.输出结果 VB 随机产生10个0~100之间的随机整数,去掉最大值与最小值,剩下8个数的和与平均数.VB VB计算：随机产生20个1～100的正整数放入数组中,显示产生的数,并求出其最大值 VB随机产生3位数的代码怎样用VB做随机产生10个1－100以内的整型数,求出其的最大值,最小值,平均值