vba 设置txt文件只读，隐藏属性

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