다음을 통해 공유


InputBox 함수(Visual Basic)

업데이트: 2007년 11월

대화 상자에서 프롬프트를 표시하고 사용자가 텍스트를 입력하거나 단추를 클릭할 때까지 대기한 다음 텍스트 상자의 내용을 포함하는 문자열을 반환합니다.

Public Function InputBox( _
ByVal Prompt As String, _
Optional ByVal Title As String = "", _
Optional ByVal DefaultResponse As String = "", _
Optional ByVal Xpos As Integer = -1, _
Optional ByVal YPos As Integer = -1 _
) As String

매개 변수

  • Prompt
    필수 요소. 대화 상자에서 메시지로 표시되는 String 식입니다. Prompt의 최대 길이는 대략 1024자이며 사용되는 문자의 너비에 따라 달라집니다. Prompt가 두 줄 이상이면 각 줄 사이에 캐리지 리턴 문자(Chr(13)), 줄 바꿈 문자(Chr(10)) 또는 캐리지 리턴/줄 바꿈 조합(Chr(13) & Chr(10))을 사용하여 줄을 나눌 수 있습니다.

  • Title
    선택적 요소. 대화 상자의 제목 표시줄에 표시되는 String 식입니다. Title을 생략하면 응용 프로그램 이름이 제목 표시줄에 나타납니다.

  • DefaultResponse
    선택적 요소. 입력한 내용이 없는 경우 텍스트 상자에 기본적으로 표시되는 String 식입니다. DefaultResponse를 생략하면 텍스트 상자가 빈 상태로 표시됩니다.

  • XPos
    선택적 요소. 화면 왼쪽 가장자리에서 대화 상자의 왼쪽 가장자리까지의 간격을 픽셀 단위로 지정하는 숫자 식입니다. XPos 및 YPos를 생략하면 대화 상자가 화면 중앙에 배치됩니다.

  • YPos
    선택적 요소. 화면 맨 위에서 대화 상자의 위쪽 가장자리까지의 간격을 픽셀 단위로 지정하는 숫자 식입니다. XPos 및 YPos를 생략하면 대화 상자가 화면 중앙에 배치됩니다.

설명

취소 단추를 클릭하면 길이가 0인 문자열이 반환됩니다.

첫째 인수 이외에 추가로 다른 인수를 지정하려면 식에 InputBox 함수를 사용해야 합니다. 위치 인수를 생략하는 경우 적절하게 쉼표로 구분해야 합니다.

참고:

InputBox 함수를 사용하려면 SafeTopLevelWindows 수준의 UIPermission이 있어야 합니다. 이 권한은 부분 신뢰 상태에서 해당 함수의 실행을 제한할 수 있습니다. 자세한 내용은 권한 요청UIPermission 클래스를 참조하십시오.

예제

다음 예제에서는 InputBox 함수를 사용하여 입력할 값을 묻는 여러 가지 방법을 보여 줍니다. x와 y 위치를 생략하면 대화 상자는 자동으로 각 축의 가운데로 조정됩니다. 확인 단추를 클릭하거나 ENTER 키를 누르면 MyValue 변수에 사용자가 입력한 값이 포함됩니다.

Dim message, title, defaultValue As String
Dim myValue As Object
' Set prompt.
message = "Enter a value between 1 and 3"
' Set title.
title = "InputBox Demo"
defaultValue = "1"   ' Set default value.

' Display message, title, and default value.
myValue = InputBox(message, title, defaultValue)
' If user has clicked Cancel, set myValue to defaultValue
If myValue Is "" Then myValue = defaultValue

' Display dialog box at position 100, 100.
myValue = InputBox(message, title, defaultValue, 100, 100)
' If user has clicked Cancel, set myValue to defaultValue
If myValue Is "" Then myValue = defaultValue

요구 사항

네임스페이스:Microsoft.VisualBasic

**모듈:**Interaction

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

참고 항목

참조

MsgBox 함수(Visual Basic)

Chr, ChrW 함수