メニュー

IF文
FOR文
Usingステートメント

ArrayListを利用
IEnumerableを実装
Dictionaryを利用
StringDictionaryを利用
Stack(スタック)
Queue(キュー)
Generic List

小文字⇔大文字の変換
文字列をある文字列で分割

日付関係
現在日付と時刻の取得
明日、来月の日付の取得
月末の日付の取得
日付チェック

ファイル関係
ファイル選択ダイアログ
ファイル読み込み
CSVファイル読み込み
XmlSerializerを利用
GZip圧縮
ファイル情報の取得
フォルダ配下のファイル情報取得

MySQLに接続
ADO.NetでSQLServerに接続

スレッドを作成
ManagementObjectSearcherを利用

ドライブ情報を取得

フォーム関係
チェックボックス
メニューバーの作成
DataGridViewのDataSourceに配置
Timerコントロール
タスクバーにアイコンを表示
プログレスバーを表示
閉じるボタンの処理
透過度の変更
ListBoxにドラック&ドロップ
WebBrowserコントロール
コントロールをマウスで移動
MDIアプリケーション
フォームに線を引く

WebAPI
Webリクエスト送信
Google Geocoding APIを呼び出す
Google Static Maps APIを呼び出す


正規表現
「^」について
「$」について
「+」について
「*」について
「.」について
「|」について
「{n}」について
「{n,m}」について
「[]」について

トップ
E-Mail
xml

ASP.Netのお勉強
ASP.Netで掲示板を作成しよう
Excel マクロ・VBAのお勉強
PHPのお勉強
AJAXのお勉強
Webデザインのお勉強
Javaのお勉強
連想書籍検索
世界の観光地検索
路線図
総合サイトCocoaLiz
ネイルサロン検索
エステサロン検索
アロマサロン検索
アイビューティーサロン検索

フォルダ配下のファイル情報取得@VB.Net

フォルダ配下のフォルダ名の取得、
また、ListViewにファイル情報を表示します。

Directory.GetFiles(フォルダパス,パターン)にて、
ファイル名を取得することができます。

また、フォルダパスよりDirectoryInfoを生成し、
GetFilesにてFileInfoを取得することで、
ファイル情報を取得できます。

以下では、取得したファイル情報をListViewに表示しています。


Imports system.io

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim fileName As String

        'フォルダ配下のファイル名取得
        For Each fileName In System.IO.Directory.GetFiles("C:\", "*.xls")
            Console.WriteLine(fileName)
        Next

        'フォルダ配下のファイル情報をListViewに表示
        'ListViewの設定
        Me.ListView1.View = View.Details
        Me.ListView1.Width = 300

        'ListViewのヘッダ作成
        Me.ListView1.Columns.Add("名前", 100)
        Me.ListView1.Columns.Add("作成日", 50)
        Me.ListView1.Columns.Add("更新日", 50)

        'DirectoryInfo生成
        Dim dic As System.IO.DirectoryInfo = New DirectoryInfo("C:\")
        Dim fileInfo As System.IO.FileInfo

        'FileInfo取得
        For Each fileInfo In dic.GetFiles("*.xls")
            'ListViewにアイテム追加
            Dim item() As String = {fileInfo.Name, fileInfo.CreationTime.ToString(), fileInfo.LastWriteTime.ToString()}
            Me.ListView1.Items.Add(New ListViewItem(item))
        Next

    End Sub
End Class




Copyright (C) 2008-2011 VB.Netのお勉強. All Rights Reserved.