Office中国论坛/Access中国论坛

标题: [求助]VBA [打印本页]

作者: rocsmith    时间: 2004-12-13 19:42
标题: [求助]VBA
我想实现这样一个功能:我的表中,文件名的字段是超链接。

我想在窗体上通过一个按钮,点击后获得所选择的文件的路径+文件名作为名称的超链接。



想问下VBA如何实现阿?

我以前是用delphi的,那个是用opendialog实现读取文件名,然后

文本框的caption ,或者 TXT的属性就是文件名。

我没学过VBA。请问如何实现???谢谢


作者: 情比金坚    时间: 2004-12-13 21:12
Private Sub lst问列表_Click()

  Dim s As String

  

  s = Nz(DLookup("例", "tabData", "[ID] =" & lst问列表.Value))

  

  

  If s <> "" Then

    lab例.Caption = CurrentProject.Path + "\DATA\" + s

  Else

    lab例.Caption = ""

  End If

  

  lab例.HyperlinkAddress = lab例.Caption

  

  

End Sub

[此贴子已经被作者于2004-12-13 14:54:07编辑过]


作者: rocsmith    时间: 2004-12-14 16:57
问列表??是个控件还是个按钮的名称???还有,我很多activeX控件都不能用[em06]
作者: 情比金坚    时间: 2004-12-14 21:40
在这里是个列表框的名字,很多ActiveX控件是要注册才能使用的。




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3