수다닷컴

아래의 소스 중 제가 이해 못하는 것들에 주석좀 달아주시면 정말로, 정말로 감사합니다.

─────────────────────────
Dim FolderPath As String, Query As String
─────────────────────────
Private Sub Form_Load()
FolderPath = C:\
Query = Dir(FolderPath, vbDirectory)ⓐ
Do While Len(Query)ⓑ
If GetAttr(FolderPath & Query) And vbDirectory Then
List1.AddItem [폴더] & Query
Else
List1.AddItem [파일] & Query
End If
Query = Dirⓒ
Loop
End Sub
─────────────────────────

ⓐ:
예를들어 C:\의 첫번째 파일의 이름이 abcd 라고 합니다.
Query 변수에 Dir(FolderPath, vbDirectory)을 대입하면
Query = C:\첫번째파일 이 됩니다. 이걸 왜 대입하는걸까요?

ⓑ :
ⓐ에서 Len(Query)의 값은 첫번째 파일 이름의 문자열 갯수가 나옵니다.
그러면 이 문자열 갯수는 abcd인 4가 나올탠대 이걸 루프로 돌리면
총 4번으로 리스트에 4개만 추가되지 않나요?

ⓒ:
여기서 Query에 Dir을 대입하는게 이해가 안되요.
일반 프로젝트에서 Query에 Dir을 대입해서 보려고 하면
프로시저 호출...어쩌구 런타임 에러가 뜨는데 여긴 뜨지 않더군요.
이건 무엇을 대입하는건가요?

질문이 너무 많나요?
모르는 부분을 하나하나 배워보고자해서 질문하게되었습니다.
아는 답만 답변해주셔도 감사합니다.

신청하기