我目前正在为化学品库存创建危险标签 . 我希望根据报告中每个记录的组合框中的数据显示所选的象形图图像 .

我的初始方法是将图像放在彼此的顶部并隐藏它们 . 然后,由于组合框选择,它们各自的图像可见 . 这在Form_Current事件中以一种形式完美地工作 . 将它放在Report_Current事件中时,只有单击时所选记录图像才会更改,但其余所有记录图像都是空白的 .

代码:

If GHS_Selection_1.Value = "1" Then
    expos.Visible = False
    flamme.Visible = False
    rondflam.Visible = False
    bottle.Visible = False
    skull.Visible = False
    exclam.Visible = False
    acid.Visible = False
    silhouete.Visible = False
    aquatic.Visible = False
ElseIf GHS_Selection_1.Value = "2" Then
    expos.Visible = True
    flamme.Visible = False
    rondflam.Visible = False
    bottle.Visible = False
    skull.Visible = False
    exclam.Visible = False
    acid.Visible = False
    silhouete.Visible = False
    aquatic.Visible = False
ElseIf GHS_Selection_1.Value = "3" Then
    expos.Visible = False
    flamme.Visible = True
    rondflam.Visible = False
    bottle.Visible = False
    skull.Visible = False
    exclam.Visible = False
    acid.Visible = False
    silhouete.Visible = False
    aquatic.Visible = False 
    ...etc

有没有更好的方法来改善这种情况? OLE对象或无界图像框?任何意见,将不胜感激 . 谢谢 .

编辑:在一个有点相关的问题中,是否有一种方法可以用相同的记录填充整个页面或多个页面,另一种方法是从单击按钮选择一系列化学品从子表格/表格打印 .