Vb.net Visual Basic-写入比前面的数字大的数字
我是一名Visual Basic新手,我有一些任务长期困扰着我。我不知道有谁可以向我请教,所以我希望这里会有一些好的人给我一些解决这个问题的线索 请注意,我是个新手,请不要对我粗暴。我需要一些“写的数字比前面的数字大”的例子。 我的英语不是很熟练,所以我不能很好地解释或寻找例子 关键是我有6个值,我需要测试并将其写入listbox,值witch大于它之前的所有值(不是它之后的值,而是尽可能多的值)Vb.net Visual Basic-写入比前面的数字大的数字,vb.net,basic,Vb.net,Basic,我是一名Visual Basic新手,我有一些任务长期困扰着我。我不知道有谁可以向我请教,所以我希望这里会有一些好的人给我一些解决这个问题的线索 请注意,我是个新手,请不要对我粗暴。我需要一些“写的数字比前面的数字大”的例子。 我的英语不是很熟练,所以我不能很好地解释或寻找例子 关键是我有6个值,我需要测试并将其写入listbox,值witch大于它之前的所有值(不是它之后的值,而是尽可能多的值) 这将返回您要查找的结果 Private Sub Button1_Click(sender As O
这将返回您要查找的结果
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim strClasses(5) As Integer
strClasses(0) = 1
strClasses(1) = 2
strClasses(2) = 1
strClasses(3) = 5
strClasses(4) = 6
Debug.Print(maxOutArray(strClasses))
strClasses(0) = 10
strClasses(1) = 5
strClasses(2) = 6
strClasses(3) = 9
strClasses(4) = 11
Debug.Print(maxOutArray(strClasses))
End Sub
Private Function maxOutArray(values() As Integer) As String
Dim currentHightest As Integer
Dim returnVal As String = String.Empty
For Each parseInt As Integer In values
If parseInt > currentHightest Then
currentHightest = parseInt
returnVal = String.Concat(returnVal, " ", currentHightest)
End If
Next
Return returnVal
End Function
那么,说得清楚一点,你是说你有一组用户输入的数字,你想对它们进行排序并按升序显示吗?不是对它们进行排序,只是为了显示比它前面的所有数字都大的数字。例:如果我输入1 2 1 5 6程序应该显示1 2 5 6如果我输入10 5 6 9 11程序应该显示10 11我希望你能理解我。而不是你的回答:)听起来你想在运行你所有的值时保持最高的值。类似的。但是我在网上找不到任何关于我的语言的有用信息,我也不知道如何用英语输入:(哦哦哦哦哦天哪,我刚刚注意到我所有的值都设置为strClass(0)。现在我明白为什么它不起作用了。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim strClasses(5) As Integer
strClasses(0) = 1
strClasses(1) = 2
strClasses(2) = 1
strClasses(3) = 5
strClasses(4) = 6
Debug.Print(maxOutArray(strClasses))
strClasses(0) = 10
strClasses(1) = 5
strClasses(2) = 6
strClasses(3) = 9
strClasses(4) = 11
Debug.Print(maxOutArray(strClasses))
End Sub
Private Function maxOutArray(values() As Integer) As String
Dim currentHightest As Integer
Dim returnVal As String = String.Empty
For Each parseInt As Integer In values
If parseInt > currentHightest Then
currentHightest = parseInt
returnVal = String.Concat(returnVal, " ", currentHightest)
End If
Next
Return returnVal
End Function