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

Definice

Obor názvů:

Microsoft.VisualBasic

Sestavení:

Microsoft.VisualBasic.Core.dll

Zdroj:

Interaction.vb

Zobrazí výzvu v dialogovém okně, počká, až uživatel zadá text nebo klikne na tlačítko, a pak vrátí řetězec obsahující obsah textového pole.

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

Požadovaný String výraz se zobrazí jako zpráva v dialogovém okně. Maximální délka Prompt je přibližně 1024 znaků v závislosti na šířce použitých znaků. Pokud Prompt se skládá z více než jednoho řádku, můžete řádky oddělit pomocí znaku návratu na začátek řádku (Chr(13)), znaku odřádkování (Chr(10)) nebo kombinace návratu na začátek řádku a odřádkování (Chr(13) & Chr(10)) mezi jednotlivými řádky.

Title

String

Nepovinný parametr. String výraz zobrazený v záhlaví dialogového okna. Pokud vynecháte Title, název aplikace se umístí do záhlaví.

DefaultResponse

String

Nepovinný parametr. String výraz se zobrazí v textovém poli jako výchozí odpověď, pokud není zadaný žádný jiný vstup. Pokud tento parametr vynecháte DefaultResponse, bude zobrazené textové pole prázdné.

XPos

Int32

Nepovinný parametr. Číselný výraz, který v twipech určuje vzdálenost levého okraje dialogového okna od levého okraje obrazovky. Pokud tuto možnost vynecháte XPos, bude dialogové okno vodorovně zarovnané na střed.

YPos

Int32

Nepovinný parametr. Číselný výraz, který v twipech určuje vzdálenost horního okraje dialogového okna od horního okraje obrazovky. Pokud vynecháte YPos, bude dialogové okno umístěné svisle přibližně o jednu třetinu směrem dolů na obrazovce.

Návraty

String

Zobrazí výzvu v dialogovém okně, počká, až uživatel zadá text nebo klikne na tlačítko, a pak vrátí řetězec obsahující obsah textového pole.

Příklady

Tento příklad ukazuje různé způsoby použití InputBox funkce k zobrazení výzvy uživateli k zadání hodnoty. Pokud jsou pozice x a y vynechány, dialogové okno se automaticky zacentruje pro příslušné osy. Proměnná MyValue obsahuje hodnotu zadanou uživatelem, pokud uživatel klikne na OK nebo stiskne klávesu 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

Poznámky

Pokud uživatel klikne na Zrušit, vrátí se řetězec nulové délky.

Pokud chcete zadat více než první argument, musíte ve výrazu InputBox použít funkci . Pokud vynecháte všechny poziční argumenty, musíte zachovat odpovídající oddělovač čárky.

Poznámka

Funkce InputBox vyžaduje UIPermission na SafeTopLevelWindows úrovni , což může mít vliv na její provádění v situacích s částečnou důvěryhodností. Další informace najdete v tématech Žádost o oprávnění a UIPermission .

Viz také

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