Sql 如何使超链接显示在microsoft access中的表单中?
这个问题分为两个部分: 第1部分:现在我有一个表单,可以从表中上传、插入和删除。我想要最后一个文本框链接到超链接 使用此代码可用于超链接,请参见下面的内容,请参见以下内容:,但现在我需要将文本改为类似“打开附件”的内容,而不是文件位置。对于按钮,我知道这是通过使用.Caption来完成的,但是更改文本框的文本并保留我刚才插入的超链接的代码是什么Sql 如何使超链接显示在microsoft access中的表单中?,sql,database,ms-access,hyperlink,vba,Sql,Database,Ms Access,Hyperlink,Vba,这个问题分为两个部分: 第1部分:现在我有一个表单,可以从表中上传、插入和删除。我想要最后一个文本框链接到超链接 使用此代码可用于超链接,请参见下面的内容,请参见以下内容:,但现在我需要将文本改为类似“打开附件”的内容,而不是文件位置。对于按钮,我知道这是通过使用.Caption来完成的,但是更改文本框的文本并保留我刚才插入的超链接的代码是什么 Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogOpen)
Dim fd As FileDialog
Set fd = Application.FileDialog(msoFileDialogOpen)
With fd
.AllowMultiSelect = False
.Title = " Please select file"
If .Show = True Then
Selectfile = .SelectedItems(1)
Me.txtHyperlink = "#" & Selectfile & "#"
Else
Exit Function
End If
Set fd = Nothing
End With
第2部分:每当我插入文件路径时,文件也会在另一个窗口中打开。我希望停止此操作,只链接到文件,并将文本框更改为“附件”,但同时保留链接。第1部分:回顾
超链接条目包含三个由磅符号分隔的部分。模板为:
显示文件中任何引用的文本文件名
Me.txtHyperlink = "Open Attachment#" & Selectfile & "#"
Textbox IsHyperlink属性必须设置为“是”
第二部分:不太理解这个问题。
你要打开什么样的文件?什么样的窗户开着?可能需要使用以下超链接-查看
我遇到过以下情况:超链接不起作用,因此使用了Shell方法:
Dim wsShell As Object
Set wsShell = CreateObject("WScript.Shell")
wsShell.Run Chr(34) & Me.tbxLink & Chr(34)
好了!!我不确定显示文本在引号中的格式!