访问表单中的条件图片

时间:2011-09-23 08:38:39

标签: ms-access vba

我想知道是否可以在表单中显示条件图片。例如:

如果X> 0,则显示图片1,否则显示图片2

我已经找了,但我没找到任何东西

谢谢

1 个答案:

答案 0 :(得分:1)

If X > 0 Then
    Me.Picture = "c:\picture1.jpg"
Else
    Me.Picture = "c:\picture2.jpg"
End If

或者如果图片不是直接在表单上,​​而是在图像控件中:

If X > 0 Then
    Me.NameOfImageControl.Picture = "c:\picture1.jpg"
Else
    Me.NameOfImageControl.Picture = "c:\picture2.jpg"
End If

修改

好的,您可以在设计模式下打开表单时执行此操作:

  • 工具栏中有一个按钮用于打开代码窗口:
    code window button
    (截图来自Access 2003,我不知道您使用的是哪个版本)

  • 您可以在表单中的事件上运行代码,例如打开或关闭表单时 查看this tutorial(第10页)。

这是关于VBA Basics in Access的另一个教程。