Okay here's the objective: user suppose to enter any 3 numbers, the program will display the largest number among the 3.

Problem is i keep getting blank answer.



Private Sub cmdFindLargest_Click()
'delcare variable
Dim intNum1 As Integer
Dim intNum2 As Integer
Dim intNum3 As Integer


'convert input value to numeric value
intNum1 = Val(txtNum1.Text)
intNum2 = Val(txtNum2.Text)
intNum3 = Val(txtNum3.Text)


'making decision
If intNum1 > intNum2 Then
ElseIf intNum1 > intNum3 Then
lblResult.Caption = "" & txtNum1.Text
End If

If intNum2 > intNum1 Then
ElseIf intNum2 > intNum3 Then
lblResult.Caption = "" & txtNum2.Text
End If

If intNum3 > intNum1 Then
ElseIf intNum3 > intNum2 Then
lblResult.Caption = "" & txtNum3.Text
End If

End Sub


hope any VB master here can enlight me

homework assignment??

I think you shouldn't be using ELSEIF in your decision making. You should use a IF within your IF statement.

Using ELSEIF gives you a different effect in your decision making. It's not the effect you are expecting. Revise your code and you will know what I mean.

So it becomes:



In fact there are easier ways to do it but I'll just correct your way. Bear in mind the code has not been tested but the logic is there. Hope that helped. Cheers.

This post has been edited by astalavista_baby: Feb 7 2006, 10:53 AM

Hmm.....sounds like an assignment ya?
I will give you the algorithm, but you will need to write it in VB by your own.

max = num1

if num2 > max then max = num2
if num3 > max then max = num3

print max

Good luck.

if intNum1 > intNum2 and intNum1 > intNum3 then
lblResult.Caption = "" & txtNum1.Text
end

if intNum2 > intNum1 and intNum2 > intNum3 then
lblResult.Caption = "" & txtNum2.Text
end

if intNum3> intNum1 and intNum3 > intNum2 then
lblResult.Caption = "" & txtNum3.Text
end

This post has been edited by shinchan^^: Feb 7 2006, 10:56 AM

Yes it's an assignment.

Thanks a lot astalavista_baby, i don't know how to thank enough for the quick respond

hey shinchan^^ your code is much simpler, it works too thanks dude.

Thanks all for the help and tips.

This post has been edited by Mr Ez: Feb 7 2006, 11:05 AM

No worries mate. What is more important is that you learned something.

that is just beginner
;p wait till u make bigger program

headache