VB下面程序对产生的10个随机数进行排序,程序中有3个错误,请在相应的行上改正
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/06 05:45:27
VB下面程序对产生的10个随机数进行排序,程序中有3个错误,请在相应的行上改正
Private Sub Button1_Click(……) HandlesButton1.Click
Dim a(9) As Integer
Dim i,j,imin,t As Integer
Label1.Text = "原始成绩为:" & vbCrLf
For i = 1 To 10
a(i) = Int(Rnd() * 101)
Label1.Text &= a(i) & " "
Next
For i = 0 To 8
For j = 9 To i + 1
If a(j) < a(j - 1) Then
t = a(i)
a(j) = a(j - 1)
a(j - 1) = t
End If
Next j
Next i
Label2.Text = "排序后的成绩为:"& vbCrLf
For i = 0 To 9
Label2.Text &= a(i) & " "
Next i
End Sub
Private Sub Button1_Click(……) HandlesButton1.Click
Dim a(9) As Integer
Dim i,j,imin,t As Integer
Label1.Text = "原始成绩为:" & vbCrLf
For i = 1 To 10
a(i) = Int(Rnd() * 101)
Label1.Text &= a(i) & " "
Next
For i = 0 To 8
For j = 9 To i + 1
If a(j) < a(j - 1) Then
t = a(i)
a(j) = a(j - 1)
a(j - 1) = t
End If
Next j
Next i
Label2.Text = "排序后的成绩为:"& vbCrLf
For i = 0 To 9
Label2.Text &= a(i) & " "
Next i
End Sub
![VB下面程序对产生的10个随机数进行排序,程序中有3个错误,请在相应的行上改正](/uploads/image/z/2601406-46-6.jpg?t=VB%E4%B8%8B%E9%9D%A2%E7%A8%8B%E5%BA%8F%E5%AF%B9%E4%BA%A7%E7%94%9F%E7%9A%8410%E4%B8%AA%E9%9A%8F%E6%9C%BA%E6%95%B0%E8%BF%9B%E8%A1%8C%E6%8E%92%E5%BA%8F%2C%E7%A8%8B%E5%BA%8F%E4%B8%AD%E6%9C%893%E4%B8%AA%E9%94%99%E8%AF%AF%2C%E8%AF%B7%E5%9C%A8%E7%9B%B8%E5%BA%94%E7%9A%84%E8%A1%8C%E4%B8%8A%E6%94%B9%E6%AD%A3)
For i = 1 To 10 改为 For i = 0 To 9
For j = 9 To i + 1 改为 For j = 9 To i + 1 step -1
t = a(i) 改为 t = a(j)
For j = 9 To i + 1 改为 For j = 9 To i + 1 step -1
t = a(i) 改为 t = a(j)
VB下面程序对产生的10个随机数进行排序,程序中有3个错误,请在相应的行上改正
求一个vb程序,关于产生随机数排序的.
c语言 编写产生100个1到10范围内的随机数的程序,并且以降序排序
vb中怎么样一次产生10个随机数,再过5秒全部消失(主要是过5秒消失的程序怎么写)
C语言:下面程序使用选择排序方法对20个整数进行排序,这20个数从键盘输入,并输出排序前和排序后的数据
编写程序,产生10 个随机数,然后按产生顺序相反的次序输出这些随机数
VB中要求随机产生10个在[10,30]的不同整数怎么编写程序?
C语言挑战题目!编写产生210个2.300到1.800范围内的随机数的程序,并且以降序排序
vb 生成15个随机数,被7整除的降序排序在combobox中,
程序改错题.请修改程序,使下面的程序是完成1+2+……+N的求和功能.(提示:有5个错误) C语言
从1—22中产生5个随机数,不能有重复,我的程序错哪里了?
Java编写程序,产生10个随机数,然后按产生顺序相反的次序输出这些随机数.