报表底色

liumporite · 发表于 2016-10-28 15:07:15

本帖最后由 liumporite 于 2016-11-17 17:40 编辑

如何根据车型，决定整个标签的底色，加了以下代码，想通过改 BOX 的底色，但不成功Private Sub Report_Open(Cancel As Integer)
DoCmd.Maximize
If Me.车型 = H60A Then '若文字为 H60A
Me.Box111.BackColor = RGB(255, 204, 153) '改为茶色
ElseIf Me.车型 = "280B" Then '若文字为 280B
Me.Box111.BackColor = RGB(128, 128, 128) '改为灰色
End If
End Sub

已经上传附件，无法实现按照机型的不同生成的标签底色不同

站到终点站 · 发表于 2016-10-28 16:11:32

使用条件格式

tmtony · 发表于 2016-10-28 16:29:22

报表还是窗体？
可
if 控件.value=1 then
控件.backcolor=rgb(255,0,0)
end if

liumporite · 发表于 2016-10-28 18:53:32

本帖最后由 liumporite 于 2016-10-28 18:55 编辑

tmtony 发表于 2016-10-28 16:29
报表还是窗体？
可
if 控件.value=1 then

就是报表以上的也已经试了，没有用吗。是整个标签底色，不是单个的控件

roych · 发表于 2016-11-1 13:51:22

把代码放在主体的格式化事件（detail_format）中试试。

liumporite · 发表于 2016-11-17 17:43:35

roych 发表于 2016-11-1 13:51
把代码放在主体的格式化事件（detail_format）中试试。

已经把代码放到 format 事件中，但是无法实现标签底色的自动变化

Henry D. Sy · 发表于 2016-11-17 18:34:26

liumporite 发表于 2016-11-17 17:43
已经把代码放到 format 事件中，但是无法实现标签底色的自动变化

是这样吗

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[报表] 报表底色

本帖子中包含更多资源

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)