标记MS Access 2013报告上的超链接

Question

我在能够在MS Access 2013中单击报表上的超链接时遇到麻烦。我的数据库提供项目日志的功能，该日志跟踪我们的组正在处理的项目。超链接用作每个项目的摘要文件（通常为PPT）的附件。每个项目都是我后端表中的记录。

到目前为止，我有：

1. 将超链接存储为数据库表中的字符串
2. 通过访问表单
拉动/编辑/添加指向记录的超链接
3. 显示超链接并通过访问表单
单击它
4. 通过引用包含路径的隐藏文本框
在报表上添加超链接

问题是超链接正确显示在报告上，有时我可以点击它，但大多数时候我无法点击它。如果我滚动报告，有时我可以使超链接处于活动状态，但它似乎被击中或错过。

以下是我用于在报告上应用超链接的代码：

Private Sub Detail_Paint()

Dim strSource As String

If Report_rptCompleted.txtHL.Value <> "" Then
    strSource = Report_rptCompleted.txtHL.Value
    Report_rptCompleted.lblHL.Caption = Right(strSource, Len(strSource) - InStrRev(strSource, "\"))
    Report_rptCompleted.lblHL.HyperlinkAddress = strSource
    Report_rptCompleted.lblHL.ForeColor = vbBlue
Else
    Report_rptCompleted.lblHL.Caption = "No Attachment"
    Report_rptCompleted.lblHL.HyperlinkAddress = ""
    Report_rptCompleted.lblHL.ForeColor = vbBlack
End If

End Sub

非常感谢有关解决此问题的任何帮助

Answer 1

我最终不得不采用不同的路线并使用文本框而不是标签。

我的解决方案是完全删除标签和OnPaint事件。我格式化文本框以显示文件名，然后使用FollowHyperlink命令在OnClick事件中引用文件路径。

打开链接速度慢一点，但工作正常。