Combobox MS access 2007使用组合框填充图片

问题：

我需要做什么？在我的表格中，我可以使用一个组合框，让它自动填充表格和表格上的图片

信息：

在MicrosoftAccess2007中，我有一个表和一个表单。表格中有姓名、电话、地址和图片的所有信息，所有信息都以表格的形式显示出来。我有一个用于com、fam1、fam2和fam3的组合框，当我在组合框上选择一个名称时，它会自动填充表格和表单上的com、com电话和com地址信息，但不会填充图片。我想我需要为组合框的“on change”做一些VB编码。图1显示了表格的格式。图2显示了表单的格式

---

我能够想出如何用以下代码更新com电话和com地址。但是组合框不允许我将图片添加到第3列中，这会使这变得更容易。我会在某个时候做一个报告，让报告查找图片可能会更容易。不过，我不确定我要为查找使用什么编码。再次感谢你。 代码

Option Compare Database

Private Sub Combo30_Change()
Me.txtcomphone.Value = Me.Combo30.Column(1)
Me.txtcomaddress.Value = Me.Combo30.Column(2)
Me.com_picture = dlookup("name", "Elders", "Name=" & Com)
End Sub

Private Sub Combo32_Change()
Me.txtfam1phone.Value = Me.Combo32.Column(1)
Me.txtfam1address.Value = Me.Combo32.Column(2)
End Sub

Private Sub Combo48_Change()
Me.txtfam2phone.Value = Me.Combo48.Column(1)
Me.txtfam2address.Value = Me.Combo48.Column(2)
End Sub

Private Sub Combo56_Change()
Me.txtfam3phone.Value = Me.Combo56.Column(1)
Me.txtfam3address.Value = Me.Combo56.Column(2)
End Sub

---

我这样做的方式不是将实际图像放在表格中，而是将它们全部放在表单本身上。为每张图片指定其自己的唯一名称，该名称对应于与其关联的字段。每张图片都设置为不可见。然后在VBA中，您可以编写如下代码：

If Me.ComboBox = Name Then
Me.NamesPicture.Visible = True
Else
Me.NamesPicture.Visible = False
End If

---

您可以将所有图片堆叠在一起，VBA运行非常平稳，我过去曾在工作中的小项目中使用过它。希望这有点帮助！：）

在表单布局上，我看到一个控件，它对应于表中的每个字段。这是有道理的。我不明白为什么这些图片会改变（除非您导航到表中的另一条记录）。假设您从

Com

组合框中选择了一个新值。这将更改表中该记录的

Com

字段中的值，但对

[Com图片]

字段没有影响。有没有其他你忘记提到的背景处理？