Comment trouvez-vous le plus grand nombre entre 5 avec vb.net?

C'est le code pour trouver maximum dans les 3 mais je veux le code pour trouver le maximum parmi 5:

Dim a, b, c As Integer

a = InputBox("enter 1st no.") 
b = InputBox("enter 2nd no.") 
c = InputBox("enter 3rd no.")

If a > b Then 
    If a > c Then 
        MsgBox("A is Greater") 
    Else 
        MsgBox("C is greater") 
    End If 
Else 
    If b > c Then 
        MsgBox("B is Greater") 
    Else 
        MsgBox("C is Greater")
    End If 
End If

OriginalL'auteur sangeen | 2013-03-26

  1. 4

    Comme David l'a suggéré, gardez vos valeurs dans une liste. C'est plus facile que d'utiliser des variables individuelles et peut être étendue à toutes les valeurs que demandé (jusqu'à des millions de valeurs).

    Si vous avez besoin de garder les variables individuelles pour une raison quelconque, ce faire:

    Dim max As Integer = a
Dim name As String = "A"
If b > max Then
    max = b
    name = "B"
End If
If c > max Then
    max = c
    name = "C"
End If
If d > max Then
    max = d
    name = "D"
End If
' ...  extend to as many variables as you need.
MsgBox(name & " is greater")
    Greate !! c'est ce dont j'ai besoin

    OriginalL'auteur Olivier Jacot-Descombes

  2. 12

    Mettre les valeurs dans un tableau et utiliser le Max la fonction (IEnumerable:

    'Requires Linq for Max() function extension
Imports System.Linq
'This is needed for List
Imports System.Collections.Generic

' Create a list of Long values. 
Dim longs As New List(Of Long)(New Long() _
                                   {4294967296L, 466855135L, 81125L})

' Get the maximum value in the list. 
Dim max As Long = longs.Max()

' Display the result.
MsgBox("The largest number is " & max)

' This code produces the following output: 
' 
' The largest number is 4294967296
    Pour répondre à l'OP, vous devez retourner l'indice de la plus grande.
    J'ai pensé à ça, oui. Vraiment c'est juste copié/collé à partir du lié page MSDN. Si ce n'est pas vraiment clair à partir de l'OP de code de ce qu'il est en train de faire et pourquoi. Il est clair, cependant, qu'il y a beaucoup de place pour l'amélioration.
    Hes un newb sûr, mais son code ne donner à la lettre de l'indice du nombre maximum. Sa en fait pas aussi trivial à faire sur IEnumerable que vous pourriez le penser. Google MaxBy
    IMPORTANT Veuillez noter que la .Max() fonction nécessite la Imports System.Linq

    OriginalL'auteur David

  3. 1

    Une solution simple pour vous,

    Dim xMaxNo As Integer
Dim xTemp As Integer

For i as integer = 1 To 5
   xTemp =  InputBox("enter No: " & i)
   xMaxNo = if(xTemp > xMaxNo, xTemp, xMaxNo)
Next

MsgBox("The Highest Number is " & xMaxNo)
    c'est simple et élégant.

    OriginalL'auteur Rajaprabhu Aravindasamy