请问这句代码是什么意思？

everyone

<p><font style="BACKGROUND-COLOR: #ffffff" face="Verdana">这是搜索文件模块里的一句代码</font></p>
<p><font style="BACKGROUND-COLOR: #ffffff" face="Verdana"></font>&nbsp;</p>
<p><font style="BACKGROUND-COLOR: #ffffff" face="Verdana">If GetAttr(CurrentPath &amp; sFileName) And vbDirectory Then</font></p>
<p>&nbsp;</p>
<p>And两边都是数字，但又不是这种if 数字1 and 数字2 = 数字3 then的形式。没有大于小于等于几直接就Then，请问这应该怎么理解？</p>

马大哈

<p>这是位操作,AND的话就是与,叫"按位与".</p>
<p>&nbsp;</p>
<p>比如,vbDirectory的值是16(10进制),则其二进制为10000,也就是说第五位为1;</p>
<p>&nbsp;</p>
<p>而如果某个LONG值里的第五位为1,就说明这个LONG值包含vbDirectory属性.</p>
<p>&nbsp;</p>
<p>所以使用AND来进行测试.</p>
<p>&nbsp;</p>
<p>比如,405的二进制是<font face="Verdana">110010101</font>,如果和10000进行与操作,则会得到结果"10000".</p>
<p>&nbsp;</p>
<p>而389是<font face="Verdana">110000101</font>,第五位为0,结果就会是0.</p>
<p>&nbsp;</p>
<p>因此上面等式完整的表达式应该是:</p>
<p>&nbsp;</p>
<p><font style="BACKGROUND-COLOR: #ffffff" face="Verdana">If (GetAttr(CurrentPath &amp; sFileName) And vbDirectory) = vbDirectory&nbsp;Then</font></p>
<p>&nbsp;</p>
<p>就是为了判断返回的属性里是否包含了vbDirectory.</p>

everyone

谢谢！