Writing a program for measuring body mass index with vb

If x>；; VB cannot connect; =? And x<=? then

Private subcommand 1_Click ()

SMS 3. Text = Round(Val(Text2。 Text / (Text 1。 Text) 2), 2)

Dimension x

Picture 1. Cls

x = Val(Text3。 Text)

If 20 < = x and x < = 22.

Picture 1. Print "Best"

else if 18.5 & lt； = x and x< Let's make it 20.

Picture 1. Print "normal"

ElseIf 22<x and x<, then 24.

Picture 1. Print "normal"

ElseIf x< then 18.5

Picture 1. Print "thin"

ElseIf 24<= x and x<, then 28.

Picture 1. Print "Overweight"

other

Picture 1. Print "Obesity"

If ... it will be over.

End joint