ショートカットを検索してリストボックスに入れるコードがあります。.lnk
拡張子なしで情報を表示するにはどうすれば変更できますか
For Each foundFile As String In My.Computer.FileSystem.GetFiles("Z:\SiteServices\Maintenance\Maintenance Support Folder\Equipment Specific Information\DES", Microsoft.VisualBasic.FileIO.SearchOption.SearchTopLevelOnly, "*" & txtSearch.Text & "*" & ".lnk")
ListBox1.Items.Add(foundFile)
Next