在做一个dll自动用,想要用像别人一样做成有一个参数有多个条件的,一直想不明白call setfile("C:\1.txt",1+2+3+7) 这样调用的话,n都变成和了,我的目的很简单,不让他变成和,或者是有什么别的办法可以准确判断调用什么属性
sub setfile(byval path ,byval n )
dim val as string
select case n
case 0
val=FILE_ATTRIBUTE_ARCHIVE & val &"|"
case 1
val=FILE_ATTRIBUTE_COMPRESSED & val &"|"
以下省略
end sub
Public Const FILE_ATTRIBUTE_ARCHIVE = &H20          '文档Public Const FILE_ATTRIBUTE_COMPRESSED = &H800      '合并Public Const FILE_ATTRIBUTE_DIRECTORY = &H10       '目录/文件夹Public Const FILE_ATTRIBUTE_HIDDEN = &H2             '隐藏Public Const FILE_ATTRIBUTE_NORMAL = &H80           '普通Public Const FILE_ATTRIBUTE_READONLY = &H1          '只读Public Const FILE_ATTRIBUTE_SYSTEM = &H4           '系统Public Const FILE_ATTRIBUTE_TEMPORARY = &H100       '临时
新人没分请见谅

这样的话就不能同时调用多个参数了，

我己经写了几十个命令自己用了，用VB6.0企业版做的

你说得不错,但是有点不明白,我先按你的方法试试看,谢谢了

[ 本帖最后由 Ez330阿牛 于 2014-3-6 22:25 编辑 ]

试过了,这样的方法可以,但是还是有点不明白

谢谢了,怎么把分给你