VB随机产生10个100到200之间的整数,将其按从大到小顺序排列

来源：学生作业帮助网编辑：作业帮时间：2024/04/28 06:32:16

VB随机产生10个100到200之间的整数,将其按从大到小顺序排列
VB随机产生10个100到200之间的整数,将其按从大到小顺序排列

VB随机产生10个100到200之间的整数,将其按从大到小顺序排列
Private Sub Command1_Click()
Text1.Text = ""
Dim A(1 To 10) As Integer, K As Integer
For I = 1 To 10
    Randomize
    A(I) = Int(Rnd * 100 + 100)
Next I
For I = 1 To 9
    For J = I + 1 To 10
        If A(I) < A(J) Then
        K = A(I)
        A(I) = A(J)
        A(J) = K
        End If
    Next J
Next I
For I = 1 To 10
If I < 10 Then
Text1.Text = Text1.Text & A(I) & ","
Else
Text1.Text = Text1.Text & A(I)
End If
Next I
End Sub

VB随机产生10个100到200之间的整数,将其按从大到小顺序排列 vb 随机产生10个100-200之间的数求最大值 vb 用随机函数产生10个[100,200]之间的随机整数向数组赋值,按降序排列并输出 VB 随机产生10个0~100之间的随机整数,去掉最大值与最小值,剩下8个数的和与平均数.VB Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出 vb利用随机函数产生100个0到9之间的整数,统计一共产生了多少个0,多少个1,统计结果 vb中随机产生10个1—100之间的数,求出小于这十个平均数的数字个数. VB随机产生10个10到100的整数,每行输出10个代码怎么写?必须是基数急求VB编程“利用随机函数产生10个50-100之间的随机整数,求它们的最大值和平均值,要求用数组做”, 利用随机函数产生10个30～100之间的随机正整数,求最大值,最小值平均值,并显示数组的值和结果用VB程序设计利用随机函数产生100个10~99之间的随机整数,找出其中的奇数和素数,并将奇数按从小到大的顺序排列vb语言. VB用数组保存随机产生的10个介于20到50之间的整数,编程求出最大值,最小值,和平均 vb编程题.随机产生10个【50,300】之间的整数,求最大的偶数和最小的奇数. VB随机产生1000个10-99之间的随机数,统计出现次数最多的数是哪几个? VB题 .利用随机函数rnd产生30个10~100之间的整数,再将它们按照由小到大的顺序排列输出 vb语言中利用随机函数产生20个50~100之间的随机整数,显示他们的最大值,最小值和写VB代码利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值 VB:随机产生30个[100,500]区间的随机整数,求其和及平均值.