0

我有 2 个表：其中一个名为“ImageDrive”，另一个名为“Person”。在 Person 表中，有一个名为“Primary Image Path”的字段，它存储部分路径，即“\DefaultPicture\default.jpg”。ImageDrive 表有一个字段 Drive，它存储“C:\MyDocuments\Pictures”。

我创建了一个人员表单，表单类型为“多项表单”。然后我删除了文本框并将其替换为主图像路径字段的图像控件。

现在的问题是，如何从 ImageDrive 中的 Drive 字段中提取信息并将其与 Primary Image 路径结合起来？我需要将它们组合起来以设置图像控件图片。

我尝试使用 Expression Builder 并想出了[ImageDrive]![Drive]&[Primary Image Drive]图像控制源的表达式。但是，当我单击表单视图时，它什么也没有显示。

这样做的正确方法是什么？

4

2 回答 2

0

包含图像控件后，进入图像控件的控制源。并使用 dlookup 方法获取驱动器，因为表单是使用 Person 表的字段创建的。下面将是要放在控制源的代码行。

"=DLookUp("[Drive]","ImageDrive","[Drive] IS NOT NULL") & [Primary Image Path]"

于 2013-06-19T01:05:29.710 回答
0

我不确定您是否想在 VBA 中执行此操作，但这里有一小段代码可能有助于获取该用户的路径。您可以将其与 Recordset 结合起来以引用您的其他图片表。或者使用两个记录集，每个表一个。

Dim myR as Recordset
Dim myR2 as Recordset
Dim filePath as String

Set myR = CurrentDb.OpenRecordset("ImageDrive", dbOpenDyanset)
Set myR2 = CurrentDB.OpenRecorset("Person", dbOpenDynaset)

'When you open these two Recordsets they will open on the first record of each FYI
'You can either use myR.FindFirst or a Select statment to sort through the records

filePath = myR![Field_name_of_path] & myR2![Field_name_from_other_table]

'Now filePath contains what you need.

'You can also use Environ$("USERPROFILE") & "\My Documents" 
'to get something like C:\username\My Documents and set that as a string as well

Set myR = Nothing
Set myR2 = Nothing
于 2013-06-18T12:49:10.597 回答