If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.Cancel Then Exit Sub Dim FileName As String FileName = OpenFileDialog1.FileName MsgBox "選択されたファイルは→" & FileName 'フォルダ名とファイル名に分けるには gg = System.IO.Path.GetDirectoryName(FileName) ’ここと ff = System.IO.Path.GetFileName(FileName) 'ここの()