Interaction.InputBox(String, String, String, Int32, Int32) Метод

Определение

Пространство имен:

Microsoft.VisualBasic

Сборка:

Microsoft.VisualBasic.Core.dll

Исходный код:

Interaction.vb

Отображает приглашение в диалоговом окне, ожидает ввода текста или нажатия кнопки и возвращает строку, являющуюся содержимым текстового поля.

public static string InputBox (string Prompt, string Title = "", string DefaultResponse = "", int XPos = -1, int YPos = -1);

static member InputBox : string * string * string * int * int -> string

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

Параметры

Prompt

String

Требуется выражение типа String, отображаемое в диалоговом окне в виде сообщения. Максимальная длина параметра Prompt составляет примерно 1024 знака и зависит от ширины используемых знаков. Если Prompt состоит из нескольких строк, можно разделить строки с помощью символа возврата каретки Chr((Chr(13)), символа перевода строки (Chr(10)) или сочетания возврата каретки и перевода строки (Chr(13) & 10)) между каждой строкой.

Title

String

Необязательный элемент. Выражение типа String, отображаемое в строке заголовка диалогового окна. Если параметр Title опущен, в строку заголовка помещается имя приложения.

DefaultResponse

String

Необязательный элемент. Выражение типа String, отображаемое в качестве ответного сообщения по умолчанию, если ничего другого не было введено. Если параметр DefaultResponse опущен, отображаемое текстовое поле будет пустым.

XPos

Int32

Необязательный элемент. Числовое выражение, которое задает расстояние в твипах между левым краем диалогового окна и левым краем экрана. Если параметр XPos опущен, то диалоговое окно центрируется по горизонтали.

YPos

Int32

Необязательный элемент. Числовое выражение, которое задает расстояние в твипах между верхним краем диалогового окна и верхним краем экрана. Если параметр YPos опущен, то диалоговое окно располагается на уровне, составляющем примерно треть высоты экрана.

Возвращаемое значение

String

Отображает приглашение в диалоговом окне, ожидает ввода текста или нажатия кнопки и возвращает строку, являющуюся содержимым текстового поля.

Примеры

В этом примере показаны различные способы использования InputBox функции для запроса пользователя на ввод значения. Если позиции x и y опущены, диалоговое окно автоматически выцентрируется по центру для соответствующих осей. Переменная 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

Комментарии

Если пользователь нажимает кнопку Отмена, возвращается строка нулевой длины.

Чтобы указать больше первого аргумента, необходимо использовать функцию InputBox в выражении. Если опустить позиционные аргументы, необходимо сохранить соответствующий разделитель запятых.

Примечание

Функция InputBox требуется UIPermission на SafeTopLevelWindows уровне , что может повлиять на ее выполнение в ситуациях с частичным доверием. Дополнительные сведения см. в разделах Запрос разрешений и UIPermission .

См. также раздел

• MsgBox(Object, MsgBoxStyle, Object)
• Chr(Int32)
• ChrW(Int32)