主题：[求助]打开外部文件代码,文件名相同，但后缀不一样？

Dim f As String = ProjectPath & "合格证\"
For Each fname As String In FileSys.GetFiles(f)
    If fname Like (f & Tables("基本信息表").Current("出厂编号") & ".*") Then
        Dim Proc As New Process '定义一个新的Process
        Proc.File = f '指定要打开的文件
        Proc.Start()
    End If
next