如何在vb中实现查看文件的属性?

Option Explicit

为达川等地区用户提供了全套网页设计制作服务，及达川网站建设行业解决方案。主营业务为网站制作、网站设计、达川网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！

Private Sub Command1_Click()

Dim fs, f

Set fs = CreateObject("Scripting.FileSystemObject")

Set f = fs.GetFile("C:\新建 文本文档.txt")

Print f.Attributes

'0 一般文件。未设置属性。

'1 只读文件。属性为读/写。

'2 隐藏文件。属性为读/写。

'4 系统文件。属性为读/写。

'8 磁盘驱动器卷标。属性为只读。

'16 文件夹或目录。属性为只读。

'32 自上次备份后已经改变的文件。属性为读/写。

'64 链接或快捷方式。属性为只读。

'128 压缩文件。属性为只读。

Print f.DateCreated

'返回指定文件或文件夹的创建日期和时间?只读?

Print f.DateLastAccessed

'返回最后一次访问指定文件或文件夹的日期和时间。只读。

Print f.DateLastModified

'返回最后一次修改指定文件或文件夹的日期和时间?只读?

Print f.Name

'设置或返回指定的文件或文件夹的名称。可读写。

Print f.Path

'返回指定文件、文件夹或驱动器的路径。

Print f.Size

'对于文件，返回指定文件的字节数；对于文件夹，返回该文件夹中所有文件和子文件夹的字节数。

End Sub

上面的就包括所有属性了，如果想要弹出窗口要自己做个窗口，把上面的属性排列上去

高分求助！vb.net清空隐藏文件夹代码

有的系统文件夹是不让删除文件的，要删除就要进入DOS 或 PE系统下了， 你想清的 是哪个文件夹 说下

vb.net 获取目录下文件夹名不包括隐藏文件夹

Vb.net获取某个目录下文件夹名称（不包含隐藏文件夹）实现代码如下：

Dim dir As New DirectoryInfo("D:\")

For Each d As DirectoryInfo In dir.GetDirectories

ComboBox1.Items.Add(d.Name)

Next

dim finfo as new fileinfo(d.name)

if (finfo.attributes and FileAttributes.Hidden)FileAttributes.Hidden then

ComboBox1.Items.Add(d.Name)

end if

分享文章：vb.net查看隐藏文件 windows文件隐藏 特殊方法才能查看
标题URL：http://cdweb.net/article/dodjcic.html