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 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 čáry oddělit pomocí znaku návratu na začátek řádku (Chr(13)), znaku odřádkování (Chr(10)) nebo kombinaceChr( návratového/spojnicového kanálu (13) & Chr(10)) mezi jednotlivými řádky.

Title

String

Optional. 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

Optional. String Výraz zobrazený v textovém poli jako výchozí odpověď, pokud není zadaný žádný jiný vstup. Pokud vynecháte DefaultResponse, je zobrazené textové pole prázdné.

XPos

Int32

Optional. Číselný výraz, který určuje vzdálenost levého okraje dialogového okna od levého okraje obrazovky. Pokud vynecháte XPos, dialogové okno se vodorovně zarovná na střed.

YPos

Int32

Optional. Číselný výraz, který určuje vzdálenost horního okraje dialogového okna v twipsu od horní části obrazovky. Pokud vynecháte YPos, dialogové okno se umístí svisle přibližně o jednu třetinu cesty dolů po obrazovce.

Návraty

String

Zobrazí výzvu v dialogovém okně, počká, až uživatel zadá text nebo klikne na tlačítko a 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 vynechány pozice x a y, dialogové okno se automaticky zacentruje pro příslušné osy. Proměnná MyValue obsahuje hodnotu zadaná uživatelem, pokud uživatel klikne na TLAČÍTKO 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.

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

Note

Funkce InputBox vyžaduje UIPermission na SafeTopLevelWindows úrovni, která může ovlivnit její spuštění v situacích s částečnou důvěryhodností. Další informace naleznete v tématu Žádosti o oprávnění a UIPermission .

Viz také

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