Interaction.InputBox(String, String, String, Int32, Int32) Metoda

Definicja

Przestrzeń nazw:

Microsoft.VisualBasic

Zestaw:

Microsoft.VisualBasic.Core.dll

Źródło:

Interaction.vb

Wyświetla monit w oknie dialogowym, czeka, aż użytkownik wprowadzi tekst lub kliknie przycisk, a następnie zwróci ciąg zawierający zawartość pola tekstowego.

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

Parametry

Prompt

String

Wymagane String wyrażenie wyświetlane jako komunikat w oknie dialogowym. Maksymalna długość Prompt to około 1024 znaków, w zależności od szerokości używanych znaków. Jeśli Prompt składa się z więcej niż jednego wiersza, można rozdzielić wiersze znakiem powrotu karetki (Chr(13)), znakiem przesuwu wiersza (Chr(10)) lub kombinacjąChr( powrotu karetki/linii (13) & Chr(10)) między poszczególnymi wierszami.

Title

String

Opcjonalny. String wyrażenie wyświetlane na pasku tytułu okna dialogowego. Jeśli pominięto Title, nazwa aplikacji zostanie umieszczona na pasku tytułu.

DefaultResponse

String

Opcjonalny. String wyrażenie wyświetlane w polu tekstowym jako odpowiedź domyślna, jeśli nie podano żadnych innych danych wejściowych. Jeśli pominięto DefaultResponse, wyświetlane pole tekstowe jest puste.

XPos

Int32

Opcjonalny. Wyrażenie liczbowe określające odległość lewej krawędzi okna dialogowego od lewej krawędzi ekranu. XPosJeśli pominięto , okno dialogowe jest wyśrodkowane w poziomie.

YPos

Int32

Opcjonalny. Wyrażenie liczbowe określające odległość górnej krawędzi okna dialogowego w górnej części ekranu. Jeśli pominięto YPos, okno dialogowe jest umieszczone w pionie około jednej trzeciej drogi w dół ekranu.

Zwraca

String

Wyświetla monit w oknie dialogowym, czeka, aż użytkownik wprowadzi tekst lub kliknie przycisk, a następnie zwróci ciąg zawierający zawartość pola tekstowego.

Przykłady

W tym przykładzie pokazano różne sposoby używania InputBox funkcji w celu monitowania użytkownika o wprowadzenie wartości. Jeśli pozycje x i y zostaną pominięte, okno dialogowe zostanie automatycznie wyśrodkowane dla odpowiednich osi. Zmienna MyValue zawiera wartość wprowadzoną przez użytkownika, jeśli użytkownik kliknie przycisk OK lub naciśnie klawisz ENTER.

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

Uwagi

Jeśli użytkownik kliknie przycisk Anuluj, zostanie zwrócony ciąg o zerowej długości.

Aby określić więcej niż pierwszy argument, należy użyć InputBox funkcji w wyrażeniu. Jeśli pominięto argumenty pozycyjne, należy zachować odpowiedni ogranicznik przecinka.

Uwaga

Funkcja InputBox wymaga UIPermission na SafeTopLevelWindows poziomie, co może mieć wpływ na jego wykonywanie w sytuacjach częściowego zaufania. Aby uzyskać więcej informacji, zobacz Żądanie uprawnień i UIPermission .

Zobacz też

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