ファイル関連：ファイルの情報一覧を取得（FileInfo）VB2008でファイルの作成日やサイズ等の情報一覧を取得する実行例サンプルです。ファイル関連へファイルの作成日やサイズ等の情報の一覧を取得するには、FileInfoプロパティを使います。 ■実行画面 取得した情報をテキストボックスに表示します。 ・ファイルが存在しているかどうか ・作成日時 ・最後のアクセス日 ・最後の書込み日 ・ファイルがあるフォルダ ・ファイルのフルパス ・ファイルの拡張子 ・ファイルサイズ  ■実行コード Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim s1 As String Dim finfo As System.IO.FileInfo finfo = My.Computer.FileSystem.GetFileInfo("c:\sitemap.html") TextBox1.Text = "" s1 = "存在: " & finfo.Exists & vbNewLine s1 = s1 & "作成日時: " & finfo.CreationTime.ToLongTimeString & vbNewLine s1 = s1 & "最後のアクセス: " & finfo.LastAccessTime.ToLongTimeString & vbNewLine s1 = s1 & "最後の書込み: " & finfo.LastWriteTime.ToLongTimeString & vbNewLine s1 = s1 & "フォルダ : " & finfo.DirectoryName & vbNewLine s1 = s1 & "フルパス : " & finfo.FullName & vbNewLine s1 = s1 & "拡張子 : " & finfo.Extension & vbNewLine s1 = s1 & "ファイルサイズ : " & finfo.Length.ToString & vbNewLine TextBox1.Text = s1 End Sub End Class Visual Basic 2008 Express Edition実践入門 |