access用超链接打开本地文件

在应用程序中， 我们有可能需要打开其他应用程序，比如调用系统的计算器，也有打开指定的文件编辑的需求；

access对于此类操作的方法还是很多的，这里介绍用超链接打开指定文件

代码如下

Dim fdg As Office.FileDialog
    Dim filePath As String
    Set fdg= Application.FileDialog(msoFileDialogOpen)
    With fdg
       .Title = "选择想要打开的文件"
       .AllowMultiSelect = False
       .Show
    End With
    filePath = fdg.SelectedItems.Item(1) '选择文件的路径
    Me.打开文件.Hyperlink.Address = filePath '超链接打开文件