Re:♡A: 에서 파일을 가져올때.

[서당개3년]

Dim fh As Integer
Dim str As String
Dim tmp As String

"파일 핸들얻기
fh = FreeFile
"열기 모드로 파일 열기
Open "A:\감자\day.txt" For Input As #fh
"문서의 끝이 아닌동안
Do While Not EOF(fh)
"문서의 한줄씩 읽어서 변수에 저장
Line Input #fh, str
tmp = tmp & str & vbCrLf
Loop
Text1 = tmp
Close #fh
"텍스트박스의 MultiLine 속성은 반드시 True 이어야 합니다.
### 전체 문장 한번에 읽기 ###

Dim fh As Integer

fh = FreeFile
Open "f:\ziptmp\test.txt" For Binary As #fh
Text1 = Input(LOF(fh), fh)
Close #fh
이 외에도 고정길이 데이터 접근에 용이한 Random 방식도 있습니다
질문하신 내용으로는 두가지를 사용할수 있겠으니 참고하세요.

[안낭^- ^]

감사해요^- ^♡