How do you write a program in VB to compare three number and print larger number?

Answer 1

' Return the maximum of a,b,c

Function max(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer) As Integer

Dim maxAB As Integer

maxAB = Math.Max(a, b)

Return Math.Max(maxAB, c)

End Function

Answer 2

Private Sub command1_click()

let a = val(text1.text)

let b = val(text2.text)

let c = val(text3.text)

if a >b then

if a >c then

print a;"is greater of all"

end if

elseif b >a then

if b >c then

print b ; " is greater of all"

end if

elseif c >a then

if c > b then

print c ; " is greater of all "

end if

else print " data provided is not valid "

end if

end if

Answer 3

Public Sub Main() Dim X As Integer Dim Y As Integer Dim cnt As Integer 'Our counter. cnt = 1 Do Debug.Print X X = Y + X Y = X - Y If cnt >= 8 Then Exit Do Else cnt = cnt + 1 End If Loop End Su