vb.net查看隐藏文件 vb显示隐藏窗口

如何在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

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

相关问答

Q1: 电脑里的隐藏文件无法显示 文件夹选项选不上显示文件 怎么办呢

电脑中vb.net查看隐藏文件的隐藏文件显示不出来vb.net查看隐藏文件了可采取以下方法：

一.windows10系统的做法

1.打开你的电脑，在桌面上找到“此电脑”图标，双击打开。

2.再出现的界面中，点击左上方的“查看”。

3.在查看界面上，你会看到“隐藏的项目”这一选项是没有被勾选的，说明隐藏的项目没有显示，想要它显示出来，该怎么做呢vb.net查看隐藏文件？

4.你只需要将“隐藏的项目”这个选项勾选就可以vb.net查看隐藏文件了。

5.你看，桌面上就出现了你隐藏了的文件，怎么样，是不是很简单呢vb.net查看隐藏文件！

二.windows7系统的做法

1.这是一个隐藏起来的文件夹，这里面的内容你是看不到的。

2.选择菜单栏中的”工具“选项，然后点击“文件夹选项”按钮。

3.在选择文件夹界面下点击“查看”按钮。

4.在查看界面下你会看到“隐藏的文件和文件夹”下勾选的是“不显示隐藏的文件和文件夹或驱动”。

5.此时你只需要勾选“显示隐藏的文件和文件夹或驱动 ”，然后选择确定即可完成设置。

6.这个时候回到之前的目录下就能看到一个文件和文件夹，注意隐藏的文件和文件夹有点暗的哦，显示后就是亮的了。

Q2: 200分,求隐藏文件显示不出来???

你可以先到控制面板上看看有没有“文件夹选项”这项。

如果没了就只好手动修复了，修复办法如下：

方法一：组策略

点击“开始→运行”，在运行对话框中输入“gpedit.msc”命令，点击“确定”按钮后，弹出“组策略”编辑对话框，依次展开“本地计算机策略→用户配置→管理模板→Windows组件→Windows资源管理器”，然后在右侧窗口中找到“从‘工具’菜单删除‘文件夹选项’菜单”选项，鼠标双击打开该选项，在属性对话框中切换到“设置”标签页，你会发现该属性选项已选中了“已启用”单选项，所以屏蔽了“文件夹选项”。这时你只要把该选项设置为“已禁用”，最后点击“确定”按钮，就能找回“文件夹选项”了。

方法二：注册表

点击“开始→运行”，输入regedit，进入注册表编辑器。依次展开“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer”分支，在右侧窗口中找到“NoFileMenu”键，将键值修改为“0”，或者删除该键。最后重新启动Windows XP即可。

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++

你每次开机有"c:\WINNT\eksplorasi.exe"找不到的窗口跳出，可以参考如下方法解决：

手动查杀:

kangen（康恩）病毒。。进安全模式。。。看下msconfig有没有

"OSA" = "%System%winword.exe" 和 "LoadService" = "Rest In

Peace"

这两样启动，如果有的话，就可以按照下面的办法删除。

进安全模式

在 windows/system/里，删除 winword.exe 和 winlog.dat

进注册表：regedit

在HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionRun

删除 掉 "OSA" = "%System%winword.exe" 和 "LoadService" = "Rest In

Peace"

删掉 HKEY_CURRENT_USERSoftwareVB and VBA Program SettingsPradana

在

HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSy

stem

删掉"DisableRegistryTools" = "1" 和 "DisableTaskMgr" = "1"

Q3: 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查看隐藏文件和vb显示隐藏窗口的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。