我的程序中有如下语句，意思是当一个条件满了3分钟，label38变成紫色（QBColor（13）），当另一个条件满了3分钟，label38变成红色（QBColor（12）），问题是：label38已经变成紫色了，当另一个条件满了3分钟后，label38应该变成红色，但是他不变，还是紫色，怎么回事呢？谢谢！



If ((Val(c1) Mod 3600) \ 60) >= 3 Then           
Form2.Label38.BackStyle = 1
Form2.Label38.BackColor = QBColor(13)
End If

If ((Val(b1) Mod 3600) \ 60) >= 3 Then            
Form2.Label38.BackStyle = 1
Form2.Label38.BackColor = QBColor(12)
End If

当label38是紫色时，满足了条件2，能变成红色；但反之不行，当label38是红色时，满足了条件1，不能变成紫色

条件是什么哟

从你的代码看, 颜色有一个优先级, 同时满足条件时,是红色优先.因为红色在后面判断。

从你所说的条件来看，你本来就没说清。
应该是，
1、仅条件1成立：紫红
2、仅条件2成立：红红
3、条件1，条件2 同时成立： 什么色
4、条件1、条件2 均不成立： 什么色

If ((Val(c1) Mod 3600) \ 60) >= 3 and ((Val(b1) Mod 3600) \ 60) < 3 Then           
Form2.Label38.BackStyle = 1
Form2.Label38.BackColor = QBColor(13)
End If

If ((Val(b1) Mod 3600) \ 60) >= 3 Then            
Form2.Label38.BackStyle = 1
Form2.Label38.BackColor = QBColor(12)
End If

我没去看是否可以,不过看你的代码,当第一条件满的时候,确实变色了,第二条件达时,需要变色,可这个时候第一条件也存在也达到,那到底人家要变什么色都不知道了,所以我觉得,你在判断第一条件的时候要一起判断第一条件到达第二条件还未到达,