[2005] if...else statements. please help.

[Shaggy Hiker]

By the end of my post, I was favoring what Eclipsyo said, however, that Return would indeed work if exiting the sub that contains the If statement is an appropriate action at that time.

[Eclipsyo]

Also, if your wanting to check the 1st IF then use a boolean to determine if you want to do another thing..

Dim blnFound as boolean = False

 If (TextBox1.Text = "1" Or TextBox1.Text = "2" Or TextBox1.Text = "3") Xor _
        (TextBox2.Text = "1" Or TextBox2.Text = "2" Or TextBox2.Text = "3") Xor _
        (TextBox3.Text = "1" Or TextBox3.Text = "2" Or TextBox3.Text = "3") Xor _
        (TextBox4.Text = "1" Or TextBox4.Text = "2" Or TextBox4.Text = "3") Xor _
        (TextBox5.Text = "1" Or TextBox5.Text = "2" Or TextBox5.Text = "3") = True Then
           blnFound = true
        End If

'now use the blnFound variable to do something else....

IF blnFound THEN 'means if blnFound = True


        If (TextBox1.Text = "1" Or TextBox1.Text = "2" Or TextBox1.Text = "3") Xor _
        (TextBox2.Text = "1" Or TextBox2.Text = "2" Or TextBox2.Text = "3") Xor _
        (TextBox3.Text = "1" Or TextBox3.Text = "2" Or TextBox3.Text = "3") Xor _
        (TextBox4.Text = "1" Or TextBox4.Text = "2" Or TextBox4.Text = "3") Xor _
        (TextBox5.Text = "1" Or TextBox5.Text = "2" Or TextBox5.Text = "3") Then
            MsgBox("flushplay")
        End If

ELSEIF not blnFound   'means if blnFound = False

        If (TextBox1.Text = "1" Or TextBox1.Text = "2" Or TextBox1.Text = "3") Xor _
        (TextBox2.Text = "1" Or TextBox2.Text = "2" Or TextBox2.Text = "3") Xor _
        (TextBox3.Text = "1" Or TextBox3.Text = "2" Or TextBox3.Text = "3") Xor _
        (TextBox9.Text = "1" Or TextBox9.Text = "2" Or TextBox9.Text = "3") Xor _
        (TextBox8.Text = "1" Or TextBox8.Text = "2" Or TextBox8.Text = "3") Then
            MsgBox("flushcomp")
        End If
END IF

Just some explains of how to use a boolean as a determination of what to do next.