根据文本框内数据更改显示颜色
来源:优易学  2011-12-9 17:36:03   【优易学:中国教育考试门户网】   资料下载   IT书店

  报表中60分以下用红字60分以上用兰字显示怎么做?

  在主体的格式化事件里输入如下代码:

  Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)

  If TextBoxNumber < 60 Then 'TextBoxNumber为分数控件

  TextBoxNumber.ForeColor = lngRed '改为红色

  ElseIf TextBoxNumber > 60 and TextBoxNumber < 80 Then

  TextBoxNumber.ForeColor = lngBlue '改为兰色

  else

  TextBoxNumber.ForeColor = lngBlack '改为黑色

  End If

  End Sub

责任编辑:小草

文章搜索:
 相关文章
热点资讯
资讯快报
热门课程培训