hi, i am having some problem with if...else statements. i have various if else statements which are controlld by 1 button.
how can i make it, so that if 1 of the if...else statements is true, then it doesnt proceed onto the next if..else statement?
the if else statements are as follows.
Code:If (TextBox1.Text = "4" Or TextBox1.Text = "5" Or TextBox1.Text = "6" Or TextBox1.Text = "7" Or TextBox1.Text = "8" Or TextBox1.Text = "9" Or TextBox1.Text = "10") Xor _ (TextBox2.Text = "4" Or TextBox2.Text = "5" Or TextBox2.Text = "6" Or TextBox2.Text = "7" Or TextBox2.Text = "8" Or TextBox2.Text = "9" Or TextBox2.Text = "10") Xor _ (TextBox3.Text = "4" Or TextBox3.Text = "5" Or TextBox3.Text = "6" Or TextBox3.Text = "7" Or TextBox3.Text = "8" Or TextBox3.Text = "9" Or TextBox3.Text = "10") Xor _ (TextBox4.Text = "4" Or TextBox4.Text = "5" Or TextBox4.Text = "6" Or TextBox4.Text = "7" Or TextBox4.Text = "8" Or TextBox4.Text = "9" Or TextBox4.Text = "10") Xor _ (TextBox5.Text = "4" Or TextBox5.Text = "5" Or TextBox5.Text = "6" Or TextBox5.Text = "7" Or TextBox5.Text = "8" Or TextBox5.Text = "9" Or TextBox5.Text = "10") Then MsgBox("highcardplay") End If If (TextBox1.Text = "4" Or TextBox1.Text = "5" Or TextBox1.Text = "6" Or TextBox1.Text = "7" Or TextBox1.Text = "8" Or TextBox1.Text = "9" Or TextBox1.Text = "10") Xor _ (TextBox2.Text = "4" Or TextBox2.Text = "5" Or TextBox2.Text = "6" Or TextBox2.Text = "7" Or TextBox2.Text = "8" Or TextBox2.Text = "9" Or TextBox2.Text = "10") Xor _ (TextBox3.Text = "4" Or TextBox3.Text = "5" Or TextBox3.Text = "6" Or TextBox3.Text = "7" Or TextBox3.Text = "8" Or TextBox3.Text = "9" Or TextBox3.Text = "10") Xor _ (TextBox9.Text = "4" Or TextBox9.Text = "5" Or TextBox9.Text = "6" Or TextBox9.Text = "7" Or TextBox9.Text = "8" Or TextBox9.Text = "9" Or TextBox9.Text = "10") Xor _ (TextBox8.Text = "4" Or TextBox8.Text = "5" Or TextBox8.Text = "6" Or TextBox8.Text = "7" Or TextBox8.Text = "8" Or TextBox8.Text = "9" Or TextBox8.Text = "10") Then MsgBox("highcardcomp") End If 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 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
thanks




Reply With Quote