请教Dir,SetAttr,kill三个函数的用法？

Question

能否举些简单例子，谢谢。VB新手！

Answer 1

dir函数
返回匹配的文件名或目录  dir[(pathname[,attributes])]
myfile=dir("c:\windows\win.ini")
myfile=dir("c:\windows\*.ini")
myfile=dir
myfile=dir("*.txt",vbhidden")  'return first *.txt file with a set hidden attributeSetAttr语句
设定文件属性信息  SetAttr pathname,attributes
SetAttr "testfile",vbhiddenkill语句
从磁盘删除文件 kill pathname
kill "d:\*.txt"

Answer 2

这些东西好好找本书看看，或者查插MSDN也行

Answer 3

SetAttr 语句
      为一个文件设置属性信息。语法SetAttr pathname, attributesSetAttr 语句的语法含有以下这些命名参数：部分 描述 
pathname 必要参数。用来指定一个文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。 
Attributes 必要参数。常数或数值表达式，其总和用来表示文件的属性。 
设置值attributes 参数设置可为：常数 值 描述 
vbNormal 0 常规（缺省值） 
VbReadOnly 1 只读。 
vbHidden 2 隐藏。 
vbSystem 4 系统文件 
vbArchive 32 上次备份以后，文件已经改变 
注意 这些常数是由 VBA 所指定的，在程序代码中的任何位置，可以使用这些常数来替换真正的数值。Kill 语句
      从磁盘中删除文件。语法Kill pathname必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。
Kill 语句示例
本示例使用 Kill 语句将磁盘中的文件删除。' 假设 TESTFILE是一数据文件。
Kill "TestFile"   ' 删除。' 将当前目录下所有 *.TXT 文件全部删除。
Kill "*.TXT"