主题：打开外部文件

If e.Table.AllowEdit = False Then '如果锁表  
    For Each file As String In CurrentTable.Current("文件名称").split(",")
        If FileSys.FileExists(file) Then '如果文件存在
            Dim Proc As New Process '定义一个新的Process
            Proc.File = file '指定要打开的文件
            Proc.Start()
        Else
            messagebox.show("文件" & file & "不存在","提示")
        End If
    Next
Else
    e.cancel = False '进入编辑
End If

如果是多文件列

 

If e.Table.AllowEdit = False Then '如果锁表  
    For Each file As String In CurrentTable.Current.DataRow.Lines("文件名称")
        If FileSys.FileExists(file) Then '如果文件存在
            Dim Proc As New Process '定义一个新的Process
            Proc.File = file '指定要打开的文件
            Proc.Start()
        Else
            messagebox.show("文件" & file & "不存在","提示")
        End If
    Next
Else
    e.cancel = False '进入编辑
End If

根据你的数据，2楼代码肯定没问题。