Determinar el mayor de tres números Codigo Fuente en Visual Basic

Problema
Desarrolle un algoritmo que permita leer tres valores y almacenarlos en las variables A, B y C respectivamente. El algoritmo debe imprimir cual es el mayor
Solución

• Entrada: 5 8 1

• Salida: 8

Codigo Fuente en Visual Basic

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object,
    ByVal e As System.EventArgs) Handles Button1.Click
        Dim A As Integer
        Dim B As Integer
        Dim C As Integer
        A = TextBox1.Text
        B = TextBox2.Text
        C = TextBox3.Text
        If (A > B And A > C) Then
            TextBox4.Text = "El numero mayor es " + Trim(A)
        Else
            If (B > A And B > C) Then
                TextBox4.Text = "El numero mayor es " + Trim(B)
            Else
                TextBox4.Text = "El numero mayor es " + Trim(C)
            End If
        End If
    End Sub
End Class

Descargar Proyecto Visual Basic