Como obter informações de arquivos

Para obter informações de arquivos como tamanho, data de criação, caminho e outras, temos os códigos abaixo:

Dim DadosArquivo As System.IO.FileInfo = My.Computer.FileSystem.GetFileInfo("Caminho completo e Nome do Arquivo")

Label1.Text = DadosArquivo.DirectoryName 'o diretório do arquivo

Label2.Text = DadosArquivo.Extension 'a extensão do arquivo

Label3.Text = DadosArquivo.FullName 'o caminho e o nome do arquivo

Label4.Text = DadosArquivo.LastAccessTime 'a data e hora do último acesso ao arquivo

Label5.Text = DadosArquivo.LastWriteTime 'a data e hora do última modificação do arquivo

Label6.Text = DadosArquivo.Length 'o tamanho, em bytes, do arquivo

Label7.Text = DadosArquivo.Name 'o nome do arquivo

Label8.Text = DadosArquivo.Exists 'se o arquivo existe

Simples, não?