vb.net中隐藏文件夹 vb隐藏显示代码怎么写

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

VB怎么一键创建隐藏的文件夹？

Private Sub Command1_Click()

Set fso = CreateObject("Scripting.FileSystemObject")

newfolder = "D:\test"

If Not fso.FolderExists(newfolder) Then

fso.CreateFolder newfolder

End If

Set fd = fso.GetFolder(newfolder)

fd.Attributes = fd.Attributes Or 2

End Sub

相关问答

Q1: vb 中如何列出一个文件夹里的所有文件(包括子文件夹中的文件、隐藏、系统、只读的文件)

DIR 可以

还可以用FSO 对象,来完成!

Dir 函数

返回一个 String，用以表示一个文件名、目录名或文件夹名称，它必须与指定的模式或文件属性、或磁盘卷标相匹配。

语法

Dir[(pathname[, attributes])]

Dir 函数的语法具有以下几个部分：

部分描述

pathname 可选参数。用来指定文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。如果没有找到 pathname，则会返回零长度字符串 ("")。

attributes 可选参数。常数或数值表达式，其总和用来指定文件属性。如果省略，则会返回匹配 pathname 但不包含属性的文件。

设置值

attributes 参数的设置可为：

常数值描述

vbNormal 0 (缺省) 指定没有属性的文件。

vbReadOnly 1 指定无属性的只读文件

vbHidden 2 指定无属性的隐藏文件

VbSystem 4 指定无属性的系统文件

vbVolume 8 指定卷标文件；如果指定了其它属性，则忽略vbVolume

vbDirectory 16 指定无属性文件及其路径和文件夹。

注意这些常数是由 VBA 所指定的，在程序代码中的任何位置，可以使用这些常数来替换真正的数值。

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

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

Q3: VB将当前文件夹中的部分文件隐藏

Private Sub Command1_Click() SetAttr "d:\文件夹名\a.txt", vbHidden SetAttr "d:\文件夹名\b.txt", vbHidden SetAttr "d:\\文件夹名\新建文件夹", vbHidden End Sub vbNormal即正常显示vb.net中隐藏文件夹，不隐藏 vbHidden 隐藏

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

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

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

For Each d As DirectoryInfo In dir.GetDirectories

ComboBox1.Items.Add(d.Name)

dim finfo as new fileinfo(d.name)

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

ComboBox1.Items.Add(d.Name)

end if

Q5: VB中怎么设定文件夹隐藏属性

函数:SetAttr

语法:SetAttr 文件名或文件夹名或驱动器名等等(必须), 参数(必须)