Private Sub A3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles A3.Click
If A3.BackColor = Color.Lime Then
ElseIf MsgBox("ต้องการเปิดโต๊ะหรือไม่", " m", MessageBoxButtons.OKCancel) = DialogResult.OK Then
A3.BackColor = Color.Red
ElseIf MsgBox("ต้องการเปิดโต๊ะหรือไม่", " m", MessageBoxButtons.OKCancel) = DialogResult.OK Then
A3.BackColor = Color.Lime
End If
End Sub
ตอนแรกปุ่ม A3 จะเป็นสี lime พอกด 1ครั้งจะมีขอความเตือนว่าจะเปิดโต๊ะหรือไม่ ถ้าใช้ ก็จะเป็นปุ่มแดง เวลาจะปิดก็กดที่ปุ่ม A3 ที่พื้นหลังเป้นสีแดง ขอความก็จะเตือนอีกว่า ต้องการปิดหรือไม่ ถ้าใช้ ปุ่ม A3 จะเป็นสี lime เหมือนเดิม
นั่งแก้นานมากครับช่วยหน่อยครับผม T T
ช่วยหน่อยครับ โค๊ดติดนั่งแก้มานานมากไม่ได้ซักที visual studio 2010
If A3.BackColor = Color.Lime Then
ElseIf MsgBox("ต้องการเปิดโต๊ะหรือไม่", " m", MessageBoxButtons.OKCancel) = DialogResult.OK Then
A3.BackColor = Color.Red
ElseIf MsgBox("ต้องการเปิดโต๊ะหรือไม่", " m", MessageBoxButtons.OKCancel) = DialogResult.OK Then
A3.BackColor = Color.Lime
End If
End Sub
ตอนแรกปุ่ม A3 จะเป็นสี lime พอกด 1ครั้งจะมีขอความเตือนว่าจะเปิดโต๊ะหรือไม่ ถ้าใช้ ก็จะเป็นปุ่มแดง เวลาจะปิดก็กดที่ปุ่ม A3 ที่พื้นหลังเป้นสีแดง ขอความก็จะเตือนอีกว่า ต้องการปิดหรือไม่ ถ้าใช้ ปุ่ม A3 จะเป็นสี lime เหมือนเดิม
นั่งแก้นานมากครับช่วยหน่อยครับผม T T