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