vb.net 教程 4-4 目录操作 Directory 1

版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
.Net对文件的操作主要通过System.Io命名空间进行的,包括驱动器、文件夹、文件信息的获取、简单操作,以及文件和数据流的读写等。

在本章教程中需要引用System.Io,请在窗体的所有代码之前,例如Form1窗体的代码

Public Class Form1

之前加上

Imports System.IO

 

除了DirictoryInfo外,.net还提供了Directory类来操作目录,

Directory提供了与DirectoryInfo类似的方法,但是不同于DirectoryInfo,Directory没有提供属性,只有方法,而且方法是静态的,也就是直接可以用的。

大家在使用的时候,那个用着简单就用哪个。

 

我做了一个类似于 《vb.net 教程 4-2 目录操作 DirectoryInfo 1》中的窗体来说明:

 

获得目录信息:

    Private Sub btnChooseFolder_Click(sender As Object, e As EventArgs) Handles btnChooseFolder.Click
        If FolderBrowserDialog1.ShowDialog <> DialogResult.OK Then
            Exit Sub
        End If

        Dim folderPath As String = FolderBrowserDialog1.SelectedPath

        txtFolderInfo.Text = ""
        txtFolderInfo.Text &= "路径:" & folderPath & ControlChars.CrLf
        txtFolderInfo.Text &= "创建日期:" & Directory.GetCreationTime(folderPath).ToString("yyyy-MM-dd") & ControlChars.CrLf
        txtFolderInfo.Text &= "最后修改日期:" & Directory.GetLastWriteTime(folderPath).ToString("yyyy-MM-dd") & ControlChars.CrLf

    End Sub

相比DirecotryInfo少了一些信息,不过可以获得一些别的信息:

    Private Sub btnCurrent_Click(sender As Object, e As EventArgs) Handles btnCurrent.Click
        txtFolderInfo.Text = ""
        txtFolderInfo.Text &= "此程序所在目录:" & Directory.GetCurrentDirectory & ControlChars.CrLf
        txtFolderInfo.Text &= "d:\bb所在根目录:" & Directory.GetDirectoryRoot("d:\bb") & ControlChars.CrLf
    End Sub

GetCurrentDirecotry()方法获得当前运行程序所在路径。

    Private Sub btnLogicalDrives_Click(sender As Object, e As EventArgs) Handles btnLogicalDrives.Click
        Dim LogicalDrives() As String
        LogicalDrives = Directory.GetLogicalDrives
        For Each drive As String In LogicalDrives
            txtFolderInfo.Text &= drive & ControlChars.CrLf
        Next
    End Sub

GetLogicalDrives()有点类似于《vb.net 教程 4-1 获取磁盘驱动器信息 DriveInfo》中用DriveInfo的GetDrives()方法,获得所有磁盘分区的Name。

运行时如图:

额,不用怀疑,我挂的硬盘分区有点多。

 

学习更多vb.net知识,请参看 vb.net 教程 目录

 

评论 3
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值