dim filename as string = openfiledialog.filename
dim fileinfo as new FileInfo(filename)
dim filepath as string = fileinfo.DirectoryName
dim name as string = fileinfo.name
dim filename as string = openfiledialog.filename
dim fileinfo as new FileInfo(filename)
dim filepath as string = fileinfo.DirectoryName
dim name as string = fileinfo.name