Dir 함수

업데이트: 2007년 11월

지정된 패턴이나 파일 특성과 일치하는 파일, 디렉터리 또는 폴더의 이름을 나타내는 문자열이나 드라이브의 볼륨 레이블을 반환합니다.

My.Computer.FileSystem 개체는 파일 입출력 작업에서 생산성 및 성능이 Dir 함수보다 우수합니다. 자세한 내용은 My.Computer.FileSystem.GetDirectoryInfo 메서드를 참조하십시오.

Public Overloads Function Dir() As String
' -or-
Public Overloads Function Dir( _
       ByVal PathName As String, _ 
       Optional ByVal Attributes As FileAttribute = FileAttribute.Normal _
) As String

매개 변수

• PathName
  선택적 요소. 파일 이름, 디렉터리 또는 폴더 이름, 드라이브 볼륨 레이블을 지정하는 String 식입니다. PathName이 없으면 길이가 0인 문자열("")이 반환됩니다.

• Attributes
  선택적 요소. 파일 특성을 지정하는 값을 가진 열거형 또는 숫자 식입니다. 생략하면 Dir에서 PathName과 일치하지만 특성이 없는 파일을 반환합니다.

설정

Attributes 인수 열거형 값은 다음과 같습니다.

값	상수	설명
Normal	vbnormal	기본값입니다. 특성이 없는 파일을 지정합니다.
ReadOnly	vbReadOnly	특성이 없는 파일과 함께 읽기 전용 파일을 지정합니다.
Hidden	vbHidden	특성이 없는 파일과 함께 숨겨진 파일을 지정합니다.
System	vbSystem	특성이 없는 파일과 함께 시스템 파일을 지정합니다.
Volume	vbVolume	볼륨 레이블을 지정합니다. 다른 특성을 지정하면 vbVolume은 무시됩니다.
Directory	vbDirectory	특성이 없는 파일과 함께 디렉터리나 폴더를 지정합니다.
Archive	vbArchive	마지막 백업 이후에 파일이 변경되었습니다.
Alias	vbAlias	파일에 다른 이름이 있습니다.

참고:
이러한 열거형은 Visual Basic 언어로 지정되며, 코드의 모든 위치에서 실제 값 대신 사용될 수 있습니다.

설명

Dir 함수에서는 복수 문자(*) 및 단일 문자(?) 와일드카드를 사용하여 여러 파일을 지정할 수 있습니다.

VbVolume은 특정 파일 이름 대신 드라이브의 볼륨 레이블을 반환합니다.

처음으로 Dir 함수를 호출할 때 PathName을 지정해야 합니다. 다음 항목을 검색하려면 매개 변수를 사용하지 않고 Dir 함수에 대한 후속 호출을 만들면 됩니다.

보안 정보:
Dir 함수를 제대로 실행하려면 FileIOPermission의 Read 및 PathDiscovery 플래그를 실행 코드에 부여해야 합니다. 자세한 내용은 FileIOPermission, SecurityException 및 코드 액세스 권한을 참조하십시오.

예제

다음 예제에서는 Dir 함수를 사용하여 특정 파일과 디렉터리가 있는지 여부를 확인합니다.

Dim MyFile, MyPath, MyName As String
' Returns "WIN.INI" if it exists.
MyFile = Dir("C:\WINDOWS\WIN.INI")   

' Returns filename with specified extension. If more than one *.INI
' file exists, the first file found is returned.
MyFile = Dir("C:\WINDOWS\*.INI")

' Call Dir again without arguments to return the next *.INI file in the
' same directory.
MyFile = Dir()

' Return first *.TXT file, including files with a set hidden attribute.
MyFile = Dir("*.TXT", vbHidden)

' Display the names in C:\ that represent directories.
MyPath = "c:\"   ' Set the path.
MyName = Dir(MyPath, vbDirectory)   ' Retrieve the first entry.
Do While MyName <> ""   ' Start the loop.
      ' Use bitwise comparison to make sure MyName is a directory.
      If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
         ' Display entry only if it's a directory.
         MsgBox(MyName)
      End If   
   MyName = Dir()   ' Get next entry.
Loop

스마트 장치 개발자 참고 사항

이 함수는 지원되지 않습니다.

요구 사항

네임스페이스:Microsoft.VisualBasic

**모듈:**FileSystem

**어셈블리:**Visual Basic 런타임 라이브러리(Microsoft.VisualBasic.dll)

참고 항목

참조

ChDir 함수

CurDir 함수

FileAttribute 열거형