이메일: im4u@im4u.co.kr
홈페이지: http://www.im4u.co.kr
소스에 대한 설명이 없어서 많이들 불편하신것 같아서 설명을 추가합니다.
>Sub Main()
>Open "input.dat" For Input As #1
>Open "output.dat" For Output As #2
While Not EOF(1)
Input #1, num, Name$
Write #2, num, Name$
Wend
>Close #1
>Close #2
>End Sub
여기서 ">" 부분은 반드시 존재해야만하는 코드로서
입력과 출력파일을 오픈하는 함수가 됩니다.
다음으로 파일에서 값을 읽어 들이는 함수는
input #[파일넘버], 변수1, 변수2, ....
다음으로 파일에 값을 쓰는 함수는
write #[파일넘버], 변수1, 변수2, .....
따라서 파일을 오픈한후에 입력을 읽어들인후에
입력된 값에 따른 결과값을 산출하여 출력파일에
출력을 하는것입니다.
위 프로그램은 입력된 파일에서 내용을 읽어들여서
출력파일에 그대로 출력하는 프로그램입니다.
|
|
