Public Class Form1

    Dim A, B, C As Single

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        A = Val(TextBox1.Text)

        B = Val(TextBox2.Text)

        C = Val(TextBox3.Text)

        If A > C Then

            If A > B Then Label5.Text = A Else Label5.Text = B

        Else

            If C > B Then Label5.Text = C Else Label5.Text = B

        End If

    End Sub

 

   

End Class