Sub getFiles()
Dim pathoffiles As String
Dim temp As String, i
pathoffiles = "D:\excel\vba"
If Right(pathoffiles, 1) <> "\" Then pathoffiles = pathoffiles & "\"
temp = Dir(pathoffiles & "*", vbDirectory + vbHidden + vbNormal + vbReadOnly + vbSystem)
Do While temp <> ""
If temp <> "." Or temp <> ".." Then
i = i + 1
Cells(i, 1) = pathoffiles & temp
temp = Dir()
End If
Loop
End Sub
想请教下上面这段代码中
条件判断 temp <> "." Or temp <> ".." 是什么意思
应该是temp的值不等于“.”或不等于“..”时
温馨提示:答案为网友推荐,仅供参考
第1个回答 2009-08-07
不太清楚