作者在 2015-04-11 10:51:45 发布以下内容
loWord = Createobject("word.application")
loWord.Documents.Open('c:\1.doc')
?loWord.ActiveDocument.ComputeStatistics(1) &&总行数
loWord.Documents.Open('c:\1.doc')
?loWord.ActiveDocument.ComputeStatistics(1) &&总行数
