열려 있는 TextStream 파일을 닫습니다.
구문
Object.Close
인수
Object: 필수. 항상 TextStream 객체의 이름입니다.
주석
다음 예에서는 Close 메소드의 사용을 보여 줍니다.
예 1:
Sub CreateAFile
Dim fso, tso
Set fso = CreateObject("Scripting.FileSystemObject")
Set tso = fso.CreateTextFile("c:\testfile.txt", True)
tso.WriteLine("This is a test.")
tso.Close
End Sub
예 2:
Sub AppendToFile
Dim fso, tso
Set fso = CreateObject("Scripting.FileSystemObject")
Set tso = fso.OpenTextFile("C:\testfile.txt", 8)
tso.WriteLine("Appending this text.")
tso.Close
End Sub