资讯

Public Function CombineCheck(ParamArray Files() As Variant) Set FSO = CreateObject("Scripting.FileSystemObject") Set objOutput = FSO.CreateTextFile(FileNamePath & "combine.txt", True) Dim X As Integer ...