本帖最后由 香川群子 于 2015-2-10 11:28 编辑 Dos版 加入Dir各种参数以后的完整代码: Sub ListFilesDos() myMode& = Val(InputBox("Search Mode:-3 To 3", "Find File", 0)) '” 的更多相关文章