vb.net 教程 4-2 目录操作 DirectoryInfo 3
来源:互联网 发布:编程对内存地址0x8000 编辑:程序博客网 时间:2024/06/07 18:44
本节重点谈谈文件夹属性的修改。
其实在 《vb.net 教程 4-2 目录操作 DirectoryInfo 1》中已经谈到了如何获得文件夹属性。
窗体设计如下图:
具体实现代码如下:
Private Sub btnAttr_Click(sender As Object, e As EventArgs) Handles btnAttr.Click Dim di As New DirectoryInfo("d:\aa") If di.Exists = False Then Exit Sub Dim attr As Integer = di.Attributes If (attr And FileAttribute.ReadOnly) = FileAttribute.ReadOnly Then If cbReadonly.Checked = False Then attr = attr Xor FileAttribute.ReadOnly Else If cbReadonly.Checked = True Then attr = attr Or FileAttribute.ReadOnly End If If (attr And FileAttribute.Hidden) = FileAttribute.Hidden Then If cbHidden.Checked = False Then attr = attr Xor FileAttribute.Hidden Else If cbHidden.Checked = True Then attr = attr Or FileAttribute.Hidden End If If (attr And FileAttribute.System) = FileAttribute.System Then If cbSys.Checked = False Then attr = attr Xor FileAttribute.System Else If cbSys.Checked = True Then attr = attr Or FileAttribute.System End If di.Attributes = attr End Sub
为简明扼要,直接设置的是d:\aa目录的属性。
整个处理流程如下图:
学习更多vb.net知识,请参看 vb.net 教程 目录
阅读全文
0 0
- vb.net 教程 4-2 目录操作 DirectoryInfo 3
- vb.net 教程 4-2 目录操作 DirectoryInfo 3 篇外
- vb.net 教程 4-2 目录操作 DirectoryInfo 4
- vb.net 教程 4-2 目录操作 DirectoryInfo 2
- vb.net 教程 4-2 目录操作 DirectoryInfo 1
- vb.net 教程 4-2 目录操作 DirectoryInfo 5
- vb.net 教程 4-4 目录操作 Directory 2
- vb.net 教程 4-4 目录操作 Directory 1
- vb.net 教程 4-3 文件操作 FileInfo 2
- vb.net 教程 目录
- 使用VB.NET的FileInfo和DirectoryInfo类进行文件操作
- vb.net 教程 4-3 文件操作 FileInfo 1
- vb.net 教程 8-3 数据库操作4
- vb.net 教程 4-5 文件操作 File 2
- vb.net 教程 8-3 数据库操作2
- vb.net 教程 8-3 数据库操作9-2
- vb.net 教程 8-3 数据库操作10-2
- vb.net教程 0-2 操作区域
- chargen协议NIO的执行过程
- FMT调制解调
- Tomcat三种运行模式(BIO, NIO, APR)
- 背包问题(Java版)
- 有点感慨万千,奈何晓不得说些啥子!
- vb.net 教程 4-2 目录操作 DirectoryInfo 3
- 泛型
- 杭电二分法NO1064
- 使用Hibernate如何获得数据库表中的数据总量
- debug&快捷键
- Sql查询联系
- iOS 通用宏定义总结
- mybatis之一对多查询实例
- SpringBoot 集成Jedis操作Redis缓存