曼陀罗mandora中文:请大侠帮我用VB编一个很小小程序,编好加200分!!!

来源:百度文库 编辑:高校问答 时间:2024/04/29 06:51:42
一个窗口一个按钮,点击按钮显示陷藏文件,再点一下该按钮隐藏隐藏文件
代码发52080969@qq.com
隐藏文件指的是在WINDOWS下带隐藏属性的文件
每次

Sub ShowFile()
'利用系统自带命令行注册表修改工具修改键值
Shell "reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced /v Hidden /t REG_DWORD /d 1 /f", vbHide
MsgBox "已显示所有文件", vbInformation + vbOKOnly, "提示"
End Sub

Sub HideFile()
Shell "reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced /v Hidden /t REG_DWORD /d 2 /f", vbHide
MsgBox "已隐藏所有文件", vbInformation + vbOKOnly, "提示"
End Sub

此两段代码对有系统属性的文件无效

楼主可以上K68征集去
http://www.k68.cn

什么叫“显示隐藏文件”和“隐藏隐藏文件”?
这两个短语可以有N种解释,你自己找人帮忙,连事情都说不清楚

一楼的答复应该加分,真逗。

这个文件是说在窗体上的还是“我的电脑”中的?