Question

我在VB.NET中有这段代码

   Dim numeros(9) As Integer
   For Each numerito In numeros
       numerito = Val(InputBox("Ingrese un numero"))
   Next

   txtResultadoMayor.Text = Val(numeros.Max())
   txtResultadoMenor.Text = Val(numeros.Min())

它应该非常简单并且给我最大值和最小值，但Min（）和Max（）都返回0.为什么会这样？

Answer 1

您需要更改代码以将数字添加到数组

   Dim numeros(9) As Integer
   For index As Integer = 0 To numeros.Count - 1
       numeros(index) = Val(InputBox("Ingrese un numero"))
   Next

   txtResultadoMayor.Text = Val(numeros.Max())
   txtResultadoMenor.Text = Val(numeros.Min())

Mix和Max在VB.Net中无法正常工作

1 个答案: