Как выбрать файл, когда у меня есть только часть имени?

Question

Я создаю приложение, которое открывает все виды файлов из разных папок. Мне нужно открыть приложение, открыв затем презентацию Powerpoint, которая имеет «1» в начале своего имени. Как мне это сделать? Я написал следующий код, но он работает только тогда, когда я ставлю в точном названии:

If (System.IO.File.Exists("FilePath\1*")) Then 
    'Lists File Names from folder & when selected, opens selected file in default program 
    Dim file3dopen As New ProcessStartInfo() 
    With file3dopen 
     .FileName = "TheFilepath\1*" 
     .UseShellExecute = True 
    End With 
    Process.Start(file3dopen) 
Else 
    MsgBox("No Such File Exists") 
End If 

Answer 1

Вы должны искать все файлы в этом каталоге с помощью Directory.GetFiles(string path, string pattern).

Dim files As String() = Directory.GetFiles("\FilePath", "1*") 

    If files.Length > 0 Then ' file found 
     Dim file3dopen As New ProcessStartInfo() 
     With file3dopen 
      .FileName = files(0) 
      .UseShellExecute = True 
     End With 
     Process.Start(file3dopen) 
    Else 
     'file not found 
     MsgBox("No Such File Exists") 
    End If