摘要： 对应力数据进行清零 Sub 清零修正() Dim a Dim cout% '注意申明变量r要为长整型 Dim myfile As String, Arr(100) As String, Arr0(100) As String, arr1(10) As String On Error Resume N 阅读全文

摘要： Dir 会返回匹配 pathname 的第一个文件名。若想得到其它匹配 pathname 的文件名，再一次调用Dir，且不要使用参数。如果已没有合乎条件的文件，则 Dir 会返回一个零长度字符串 ("")。一旦返回值为零长度字符串，并要再次调用 Dir 时，就必须指定 pathname，否则会产生错 阅读全文