在Access数据库中插入图像作为超链接

时间:2014-03-07 10:54:24

标签: image ms-access hyperlink access-vba

我正在尝试将图像路径插入Access数据库。我有一个名为logo的超链接字段,我正在使用此代码浏览图像:

Dim dialog As FileDialog
Set dialog = Application.FileDialog(msoFileDialogFilePicker)
With dialog
    .AllowMultiSelect = False
    .Title = "Select A File To Use As A Logo"
    .Filters.Clear
    .Filters.Add "Images", "*.gif; *.jpg; *.jpeg;*.bmp;*.png"
    .ButtonName = "Use This File"
    If .Show = True Then
        Me.im1 = .SelectedItems.Item(1)
    End If
End With

im1是用于查看路径的未绑定文本框。问题是它将文件路径显示为文本,而不是超链接。我想在im1的表单中将文件名显示为超链接。这可能吗?

1 个答案:

答案 0 :(得分:0)

文字是文字。如果你想要一些东西显示为超链接,你需要告诉你的文本框它正在做什么。它无法猜测。

im1.IsHyperlink =真

然而,更容易做的事情可能是使用Label而不是文本框。将.HyperlinkAddress属性设置为您的链接地址