我想让温度①低于-100时字体颜色变黄色；②低于290为黑色③低于550为绿色④大于550为红色。
②③④好像都行，只有①里边的零下100变黄色实现不了。代码里边“-100”的负号是黑色的，100是粉色的，应该怎么输入或者设置才能让它变色呀？

（VBS代码如下）

Function ForeColor_Trigger(Byval Item)

Dim expression

Dim tag1

Set tag1 = HMIRuntime.Tags("输入/输出域32")

tag1.Read

expression = tag1.value

If expression <= -100 Then

  ForeColor_Trigger = vbYellow

Elseif expression <= 290 Then

  ForeColor_Trigger = 0

Elseif expression <= 550 Then

  ForeColor_Trigger = 40192

Elseif expression > 550 Then

  ForeColor_Trigger = vbRed

Else

  ForeColor_Trigger = 0

End If

End Function