파일 출력

Dim path as String
Dim foo As Integer

path = App.path + "\output.dat"
foo = FreeFile   
Open path For Output As #foo  'Out file를 만들기 위해 fo로 Open (TXT FILE)

Print #foo, "True"
Close #foo