VB如何隐藏多个文件,
VB如何隐藏多个文件,我用以下这段代码,有时候后能隐藏,有时候又不能隐藏,三个文件
Private Sub Command1_Click()
Dim fs, f, r
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile("c:\1.txt")
f.Attributes = f.Attributes + 2
f.Attributes = f.Attributes + 4
Set f = fs.GetFile("c:\2.txt")
f.Attributes = f.Attributes + 2
f.Attributes = f.Attributes + 4
Set f = fs.GetFile("c:\3.txt")
f.Attributes = f.Attributes + 2
f.Attributes = f.Attributes + 4
end sub
还又怎么删除隐藏的这几个文件,
用KILL “1.TXT”删除不了
学习
我用以下这段代码,有时候后能隐藏,有时候又不能隐藏,三个文件
可以使用API函数SetFileAttributes来设置文件为隐藏的。
相关问答:
为什么C写的DLL文件C、PB能调用VB不能调用?
VB里为什么有的DLL直接通过引用可以使用?有的需要通过declare申明外部函数?这些DLL有什么差别?
1、为什么PB能通过DECLARE声明而VB不行?
2、如果这个dll中的 ......
要用vb打印一条线,长度是100毫米怎么写?
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Print ......
用VB怎么只针对windows自带的文件的右键添加菜单 如(.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
在vb这编程里似乎有很多的东西是相联系的,为什么有些人对vb的编程摸不到头脑啊!并且有些事很容易的,但是却把它们的代码变成复杂,也去想一些不能实现的东西啊!
没分了,楼主多来点分!
来接点分
......