关于VB的两个问题

Question

请问一下,
 
有谁能用最短的代码来   修改  一个文件的属性?????要越短越好,或者有哪个函数可以用
还有就是我想问下 ,我想用一个量来代替
Text1.Text&"\"&"xxsb.txt"   ,Text1.Text是用户输入的盘符,
那么  这个变量应该 设置成什么类型的 呢??????  string  吗???还是什么????谢谢

Answer 1

SetAttr   语句
  为一个文件设置属性信息。   
    
  语法   
    
  SetAttr   pathname,   attributes   
    
  SetAttr   语句的语法含有以下这些命名参数：   
    
  部分   描述     
  pathname   必要参数。用来指定一个文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。     
  Attributes   必要参数。常数或数值表达式，其总和用来表示文件的属性。     
    
    
  设置值   
    
  attributes   参数设置可为：   
    
  常数   值   描述     
  vbNormal   0   常规（缺省值）     
  VbReadOnly   1   只读。     
  vbHidden   2   隐藏。     
  vbSystem   4   系统文件     
  vbArchive   32   上次备份以后，文件已经改变     
    
    
  注意   这些常数是由   VBA   所指定的，在程序代码中的任何位置，可以使用这些常数来替换真正的数值。   
    
  说明   
    
  如果想要给一个已打开的文件设置属性，则会产生运行时错误。       
  SetAttr   语句示例   
  本示例使用   SetAttr   语句来设置文件属性。   
    
  SetAttr"TESTFILE",   vbHidden       '   设置隐含属性。   
  SetAttr"TESTFILE",   vbHidden   +   vbReadOnly       '   设置隐含并只读。

Answer 2

dim s as string
s=Text1.Text&"\"&"xxsb.txt"

Answer 3

那我要把  xxsb.txt  文件改为  隐藏并只读是不是 直接在程序中写  SetAttr xxsb.txt,   vbHidden   +   vbReadOnly

Answer 4

要写全xxsb.txt的路径,如:
SetAttr "c:\123\xxsb.txt",   vbHidden   +   vbReadOnly

Answer 5

对了,  顺便问一下,  我想要删除一个改了文件属性,如只读,隐藏等,要用  哪个函数???kill 吗???还是哪个,  请举个例子,就用   autorun.inf  文件谢谢....

Answer 6

autorun.inf  文件是自动运行的文件，这个文件里面不能用这些函数啊。。你怎么乱用函数据啊
”我想要删除一个改了文件属性,如只读,隐藏等“这个用kill就可以了啊

Answer 7

如果你用Kill语句会报告错误，因为有的文件是系统属性的
如果你用DOS命令，和你运行CMD结果是一样的，删除到系统属性的文件处停止。
综上所述，不如用Format来的好。

Answer 8

晕,那就是说   我  想把一个autorun.inf  文件的属性件改为    隐藏并只读  ,不可用 
SetAttr "c:\123\autorun.inf",   vbHidden   +   vbReadOnly  了吗?????那用  Format是不是                  Format   c:\123\autorun.inf啊???不好意思了  ,我太笨了......

Answer 9

shell "attrib +h +r c:\123\autorun.inf"就可以了

Answer 10

//我想要删除一个改了文件属性,如只读,隐藏等,要用  哪个函数???没看懂删除文件用kill
删除文件属性(本质上还是设置文件属性)还是用SetAttr

Answer 11

WallesCai(女人之美,在于蠢得无怨无悔,男人之美,在于撒谎撒得白) 用的是dos命名吧

Answer 12

我是说我想要删除一个改了文件属性,如只读,隐藏等的  autorun.inf  的文件,要用  哪个函数???

Answer 13

shell "attrib -h -r c:\123\autorun.inf"
shell "del c:\123\autorun.inf"
就可以了

Answer 14

//我是说我想要删除一个改了文件属性,如只读,隐藏等的  autorun.inf  的文件,要用  哪个函数???删除文件用kill即可,拜托兄弟看看msdn吧