Office中国论坛/Access中国论坛

标题: 怎样使列表值中的某一项显示为红色啊? [打印本页]

作者: 小小鸟 时间: 2009-1-6 16:29
标题: 怎样使列表值中的某一项显示为红色啊?
怎样使列表值中的某一项显示为红色啊?

作者: Henry D. Sy 时间: 2009-1-6 16:32
描述不清

作者: Henry D. Sy 时间: 2009-1-6 16:38
您指的是列表框吗？
如果是的
列表框不支持更改某个列表项的字体或者颜色

作者: 小小鸟 时间: 2009-1-6 16:45
是组合框中的
行来源类型-----值列表

行来源那里,我记得好象可以.但是不知道怎么写了。

作者: Henry D. Sy 时间: 2009-1-6 16:48
组合框可以

作者: 小小鸟 时间: 2009-1-6 16:55
请问设置红色的参数是什么啊? 谢谢

作者: Henry D. Sy 时间: 2009-1-6 16:57
直接在条件格式里设置就可以了

作者: Henry D. Sy 时间: 2009-1-6 16:57

原帖由 小小鸟 于 2009-1-6 16:55 发表
请问设置红色的参数是什么啊? 谢谢

vbred

作者: 小小鸟 时间: 2009-1-6 17:12
应该怎么加啊，老是不对。vbred前面是不是还有什么符号？

North;South;East;West

作者: slowgrace 时间: 2009-1-6 17:20
你是想使组合框的下拉列表的某一行为红色么？

作者: 小小鸟 时间: 2009-1-6 17:22
对啊

作者: Henry D. Sy 时间: 2009-1-6 17:24
1. 用条件格式
2. 用vba
  Private Sub Combo0_AfterUpdate()
If Me.Combo0 >= 0 Then
      Me.Combo0.ForeColor = vbBlack
Else
      Me.Combo0.ForeColor = vbRed
End If
End Sub

作者: 小小鸟 时间: 2009-1-6 17:28
我记得原来老师讲的时候，好像可以直接设置的啊。

印象最深的就是红男绿女，而不需要写代码吧。

作者: slowgrace 时间: 2009-1-6 17:28

原帖由 Henry D. Sy 于 2009-1-6 17:24 发表
1. 用条件格式
2. 用vba
  Private Sub Combo0_AfterUpdate()
If Me.Combo0 >= 0 Then
      Me.Combo0.ForeColor = vbBlack
Else
      Me.Combo0.ForeColor = vbRed
End If
End Sub

貌似你说的不是她要的

作者: slowgrace 时间: 2009-1-6 17:30
她是希望下拉列表里的颜色改变。

作者: slowgrace 时间: 2009-1-6 17:31

原帖由 小小鸟 于 2009-1-6 17:28 发表
我记得原来老师讲的时候，好像可以直接设置的啊。

印象最深的就是红男绿女，而不需要写代码吧。

反正我是没见过下拉列表某一行变颜色的

作者: 小小鸟 时间: 2009-1-6 17:31
恩，用条件格式也可以。但那好像是更新后的一个判断

我说的在点击打开后看到的一项就是红色的。

作者: 小小鸟 时间: 2009-1-6 17:38
就好像这样。

[ 本帖最后由小小鸟于 2009-1-6 17:41 编辑 ]

作者: slowgrace 时间: 2009-1-6 17:46
你先告诉我你这个图是怎么做出来的吧？呵呵。

作者: 小小鸟 时间: 2009-1-6 17:47
PHOTOSHOP

[ 本帖最后由小小鸟于 2009-1-6 17:49 编辑 ]

作者: slowgrace 时间: 2009-1-6 17:51
呵呵。强。

作者: 小小鸟 时间: 2009-1-8 10:29

原帖由 小小鸟 于 2009-1-6 17:38 发表
就好像这样。

没人知道啊??

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)