根据文本框内数据更改显示颜色

60分以下的语句用红色显示，60分以上用蓝色显示，怎么办？

在主体的格式化事件中输入以下代码:

Private Sub Detail_Format(取消为整数，格式化计数为整数)

Textboxnumber，则“Textboxnumber”是一个分数控件。

文本框编号。“ForeColor = lngRed”更改为红色。

ElseIf TextBoxNumber > 60且TextBoxNumber < 80，则

“textbox number . forecolor = LNG blue”更改为蓝色。

其他

“textbox number . forecolor = lngblack”更改为黑色。

如果…就会结束

End Sub